$4.95 April 1989
Annual Subscription: $18.00
CATS FEST EDITION
SEE INSIDE COVER FOR INFORMATION
UPDATE SUPPORTS
Sinclair QL---Canbridge 288---I's-2068
and DISK DRIVE SYSTEMS
UPDATE Magazine
1317 Stratford Ave.
Panawa City, FL 32404 Tel 904 871 3556
NEws AND New PRopucTs
send a MaY 567 £9869
Timex Sinclair
The Biggest T/S Party of the Decade
THIS IS A SHOW FOR THE:
FEST IS TO BE HELD AT HOWARD JOHNSON'S
ROUTE 450 & 95, EXIT 20B, NEW CARROLLTON,
2X 80 2x81 ‘1/8 1000
a MD.
Ts 1500 TS 2068 Z 88
. TICKETS ARE $7.00 FOR 2 DAYS IN ADVANCE
z 992 sinclair PC $10.00 AT THE DOOR
poion organizer & Amstrad HOTEL IS $62.00 PLUS 10% HOTEL TAX. | (SPECIAL)
Fein: © a
Projected Program. =: | FRIDAY NIGHT INFORAMAL BANQUET WILLROUND
rd | $17.00. EVERYONE IS INVITED. LIMITED SEATING
Erie eit stunt B | venoor TaBLes ARE $25.00 EACH.
Tented tect ny aaenige B | users croup TABLES ane $10.00 EACH.
: ONE FREE ADMISSION TO SHOW WITH HOTEL
ca rat bp inaniea RESERVATION FOR FIRST 50 ROOMS RENTED.
See eee nee © | aovance T1CKETS AND HOTEL RESERVATIONS
= Open SHOULD BE MADE BEFORE 4/1/89.
x = speakers ~
20 aie te s = - videos a
eerste er CHECKS SHOULD BE MADE OUT TO:
0 PM ~ Hospitality CATS CAPITAL FEST
ears BOX 24
aus GARRETT PARK, MARYLAND 20896
Suncay? Audrey Curnutt
301-439-8756
Noon ~ videos a It CAN Work!!
ackba dire ere We have a central location on the East coast.
3 PM to 5 PM - Wrap-up\Clean-up We are accessible, with a 24 hour
> bulletin board for fest
Re information# 588-0579.
oy We : : 1(30 1)5
Ro - are going after the biggest names for our seminars.
fe) e can offer non-computerist s i ij ;
on alternate diveicns Pp pouses and children a variety of
ss .
We are doing our homework - Two preliminary mailings to 5000
known QL owners and over 5000, 2068 and 1000 owners.
AND YOU CAN BE HERE TOO!
UPDATE MAGAZINE
APRIL 1989
SINCLAIR QL
CAPS Mult I Fask
CAT Print
Cable Column
Issue Software
LINK the 288
LLIST ULL TI ty
Loop Printer
Malifile Hints
Quirks
Repairs
Software Review
Styles, Macros
36-59
40
29-31
53
a
43
20
42
ott
att
25
24
CAMBRIDGE 288
Link with Qt
Now Tlems
Rev law
4
3,41,51
6-8
GENERAL INFORMATION
APRIL 1989
Advertising 49
BOStug 4
Publishing Data 3
qx 4
S.N.U.G. 4
Sine Link 4
Update Library 5,52
ZX Appeal 4
TS-2068 ARTICLES
Bob's Notebook AA-AG
CATS Library 4
FO-68 Update 21-23
INPUT UTI Ti ty 12-17
Issue Disks 52
LKDOS Catalog 32
LKDOS Track 0 34-35
Proflle Names 40
ReNum to 10 Grand = 44
SIncus Library 4
T.0.8. Serial Print 18-19
TASORT 45-46
TOS Vars Save/load 41
Yolca Recognition 26-28
ADVERTISEMENTS
CATS FEST 1
Club 288 51
Domino Cubss 51
€MSOFT 48
Grey Enterprizes Back Cover
Larken Electronics 47,50
Personal Ads 35,40, 46,53
RMG Enterpr izes 50,54
Update Ul brary 52,53
Wood and Wind 48
2
UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
oe UPDATES ***
THIS ISSUE and NEXT: Guess you've noticed the 17 point print size of this issue.
This resulted in 35% more (BEEF) content, but this print is about as small as we dare
go. A very painful task was to keep the page count down to 50. Some 65 pages of good
articles had to be held for coming issues. LOOKING AHEAD- The next (JULY) issue will
be the last of this issue year and all subscriptions will end with the July issue. So,
PLEASE start thinking "RENEWAL", and dont be a straggler! Prompt renewal will assure
Magazine Size, Quality, and Timeliness.
TRUTH IN CIRCULATION can hurt advertising potential, but build reputation. Update
circulation level is at around 500 and building. All 50 U.S. States and all Canadian
Provinces, plus three foreign Countries are represented. The breakdown of population
is; 50% TS-2068, 50% Sinclair QL, 12% Cambridge 288. About 70% use two or three of
these Computers, and express their intent to continue to do so. Sinclair QL users are
evenly divided between having Disk Drive or just MDV, and having extra memory or not.
95% of TS-2068 users have Disk drive and are divided; 47% Oliger Disk, 47% LKDOS, los
FD-68, 8% TOS Zebra, 4% Ramex, with 30% having Dual DOS capability. This is a very good
mix of Sinclair Users, but we need MORE. Update will hit Computer Shopper with a promo
ad soon. You can help by "arm twisting" other Sinclair Users to subscribe. Shame them
to subscribe if they are reading your copy. (or a club copy)
The quality of the next issue is assured by a full issue of articles on hand. Due
to space limits this issue wont have much hype about the ISSUE DISKS. If you want some
EXCELLENT ensembles of Disk and MDV software and utilities, refer to the January 89
issue of UPDATE to see what is available in the ISSUE DISK Library. These disk and mdv
ensemsles are excellent values for $20 and cannot be found elsewhere for near the price.
We are working on broadening the TS-2068 disk series to include TOS Zebra systems. Next
issue will add at least one more Issue Disk/MDV for both the TS-2068 and the QL. This
issue concentrates upon Key-In projects. You can be assured that these key-in projects
DO WORK, and each will add something useful and NEW to your computing capability.
casa.
Publishing Data
UPDATE MAGAZINE is a publication that is
devoted to the support of the users of
Sinclair Computers which includes the
Cambridge 288 New Stuff Sinclaix QL, the Cambridge 288, and the Timex
TS-2068. Update is published quarterly on
the first day of January, April, July, and
288 to Sinclair QL Link: to ted
: October. The emphasis is upon PERMANENT
transfer files back and forth INFORMATION content to build a User Library
and use QL Disk/MDV. of Progcamming and Operational references.
The standard issue is 50 pages.
288 Cassette Recorder intfc. The subscription year is October through
Load/Save data & prog to cass. July. Subscription is $18.00 per issue year.
Back issues are available in year packs of
. . four issues for $16.00 (1987 and 1989).
288 Disk Intfc and 3 1/2" DD. Advertising rate schedules are published
Runs on batteries. in the back page of each issue. Subscribers
may insert free line ads for the sale of
288 Tech Reference Guide. their own surplus computer products.
Article participation is encouraged.
Check price with: your Dealer. UPDATE Magazine Tel: 904 871 3556
1317 Stratford Ave. 904 871 4513
Panama City, FL 32404
*** Renew your subscription before July and the rate increase **
$16.00 now -- $18.00 after July 1.
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE
keeK 6S IINCLATIR
S.N.U.G. (Sinclair North American User
Group)
Update Magazine has withdrawn its offer
to allow SNUG to take over publishing the
magazine. This was because of two reasons:
1. It did not appear that SNUG was yet
sufficiently organized to take on the
responsibilities. 2. Strong opposition to
SNUG publishing a magazine developed from
other sources.
Other Developments: SNUG membership is at
approximately 60 members. An election of
SNUG officers has been conducted via letters.
The results of this election are not
available as this issue goes to press.
Update subscribers are advised to watch
for news about SNUG, its plans, activities,
and membership benefits offered, in future
issues and in other publications. The growth
and success of SNUG seems to hinge upon their
development of an attractive membership
benefits package. We wish them success and
will report their progress.
***kk The Event of the Year ****
The CATS FEST! Just in case you glossed
over the announcement on the inside cover
page- This will be the biggest and the
bestest Sinclair Timex convention of this
year. See you there-~
THE SINCUS TS-2068 LIBRARY of DISK PUBLIC
DOMAIN
SINCUS has devoted a lot of work into
purifying public domain programs and
re-working the programs to operate in two
disk formats, Oliger SAFE, and Larken LKDOS.
Update bought the Four Disk Oliger Library a
few months past and rates the disks as an
QUISTANDING library (More than 120
programs!). Now it is available in LKDOS
format. Send $2.00 to cover costs of
receiving an index of Disk programs to: John
Colona (SINCUS), 28 Guilfoyle Awve.,
Binghamton, NY 13903. SINCUS also publistes
a good newsletter that is worthy of
subscribing to.
SINCLAIR QL FIX- A source for Repairs and
Up-grades
Dan Elliott, RR-1 Box 117, Cabool, wo
65689, says that he is now ready to receive
QL Computers to install his "Outside Power
Supply and Regulator". He says that this
up-gcade completely eliminates the LOCK UP
COMPUTING
APRIL 1989
KKK
caused by un-stable QL power. This fix costs
around $50 ( + or-a few). A "Coleco Power
Supply and dual regulator" with ON OFF switch
is supplied. Keep your QL power module to
run your electric train or mustatche trimmer,
as you wont need it for the QL anymore.
Update's spare QL is receiving this power
mod. It had the
Syndrome) «
"S.L.S." (Sudden Lock Up
GOOD QL SOFIWARE-- WOOD AND WIND
COMPUTING, RR-2 Box 92, Cornish, NH 03743, is
Bill Cable's Software Development House.
Bill has at least six more excellent
softwares for the QL, all for either Expanded
QL's or Standard QL's. Dont wait for his
programs in Update. Send SASE for a program
list and pricing. We need to keep this
outstanding programmer working for us.
TS~2068 Cassette Public Domain Library:
CATS, PO Box 467, Fairfax Station, VA 22039,
has one of the largest cassette libraries for
the TS-2068. CATS also is one of the largest
TSUGS and produces an excellent newsletter.
A $2 check for information is well spent.
ONTARIO CANADA has one of the largest and
most active TSUGS. Last issue Update
mentioned that SINC LINK, the newsletter of
this group, is one of the best sources for
Larken Disk LKDOS information. That slighted
some of the Ontario group's members. SINC
LINK and the Ontario Club has a well rounded
membership consisting of users of all
Sinclair computers. The Sine Link newsletter
covers all systems. Two of their members,
Bob Mitchell and George Chambers, are
foremost LKDOS programmers and have built up
one o£ the most complete libraries of LKDOS
Disk Software and utilities. This library
also contains programs on cassette and is
available at nominal cost to members ard
subscribers to SINC LINK. SINC LIN, 14
Richome Court, Scarborough, Ontario, Canada,
M1K 1Y1.
2X-APPEAL is the newsletter of the
Vancouver, Canada TSUG. This newsletter has
good coverage of both the QL and the TS-2068.
Membership is $15 and includes a
subscription to ZX-APPEAL. ZX~Appeal, 2006
Highview Place, Port Moody, BC, Canada, V3H
ANS.
Pony Express galloped through the Indian
Territories and opened up the West for
communications. Western Sinclair
Communications is via "THE PLOTTER", a
UPDATE MAGAZINE:
newsletter published by CCATS, in OREGON.
PLOITER always has good article support for
the QL and TS-2068. Pony express operates a
bit faster now a days, making it both
practical and beneficial to make them bring
you an issue of PLOTTER each month. SASE to
THE PLOTTER, 655 N.W. Territorial Road,
Canby, OR 97013.
ELECTRONIC MEDIA and Newsletter: This
quib may contain some errors. There are
several TSUGS in the San Francisco area that
cooperate to publish Sinclair programs amd
utilities. There is a written newsletter
TIMELINEZ, PO Box 1312 Pacifica, CA 94044,
and another thrust at information propagation
via BBS for modem download. Update receives
the Timelinez newsletter. Timelinez is
invited to send in a re-write of this
epistle, explaining WHAT and HOW they do it.
Other TSUGS are also invited to send in brief
announcements of their repertriore.
BOSIUG Sinclair/Timex Newsletter is a very
informative newsletter published by BOSIUG,
which is one of the. largest and most active
TSUGS. The newsletter is always well done
and has a wealth of programming information
for the Sinclair QL and TS-2068. BOSTUG, PO
Box 8763, Boston, MA 02114-8763, Peter Hale
is the Editor.
Q.Z.X. is a newsletter that covers Amateur
Radio and Sinclair Computers. Q2X has
international readership and is likely the
best source for PACKET information. Q2X,
2025 O'Donnell Drive, Las Cruces, NM 88001.
TS-2068 and Sinclair QL Support
A RAM RAR j
support includes Sinclair QL Micro Drive and
80 track Disk. TS-2068 Larken Disk, Oliger
Disk, and Aerco FD-68 Disk Formats are
supported. We are working on establishing
FDD (Zebra-TOS) support. Called "Issue
Disks", this is an ensemble of programs and
utilities, listed or documented in Update
Magazine.
The purpose of the Issue Disk program is
to provide the users with useful and
inexpensive programs and utilities, and to
provide incentive for programmers to support
us. The Issue Disks are bargain priced at
$20 each, and the modest profits go to the
programmers.
Each magazine issue will have a listing
and discription of the Issue Disks offered.
Each disk or MDV is stuffed to capacity with
APRIL 1989
APRIL, 1989
useful programs.
Update urges subscribers to
participate in the Issue Disk/MDV program to
improve their program library and to help
build North American Programming Support. An
added incentive to participate is the disks
or full
and mdvs are Guaranteed to Please,
refund.
TS-2068:
still BUSY!
Larry Kenny, Larken Electronics,
Larry's RAM DISK hardware board was
selling like hot cakes to lumberjacks until
the price of 43256 chips shot up. This is
one of the best additions to the TS-2068 that
has come down the pike. R.M.G. Enterprises,
(Tel: 503 655 7484) still has some. R.M.G.
also carries a full line of QL and TS-2068
support items.
Now Larry has just released "MAXCOM", a
most impressive Communications software
package for Modem Com. See his ad in this
issue for this and still more new software.
Ed Grey Enterprises (213 759 7406) handles
CKDOS, Oliger DOS, Modem Communications
software ‘and equipment, plus a good catalog
of other TS-2068 and Disk Drive Support.
SINCLAIR PUBLICATIONS NEWS
By now SyndWare News subscribers should
have received the ending issue of SYN. We
wont have an obituary or even a funeral, as
SincWare News will be absorbed into the
Quantum Levels magazine pages. Subscribers
to SYN will receive the magazine under the
QL's name. Jeff Moore continues to be the
Publisher. (This, according to the
information published in the final edition of
Syneware News.)
TIME DESIGNS MAGAZINE
Update received a lengthy news release
from Tim Woods, publisher of TDM. For the
sake of brevity it will be put into a nut
shell. Tim promises to get back on schedule
with Time Designs after a problem period that
included the joyful addition of one "David
Anthony Woods" to the family, Tim invites
postcards if issues have been missed or make
your problem calls to 503 824 2658.
NEW CAMBRIDGE 288 PUBLICATION
PIPE LINE is the name, and is being
published jointly by Time Designs and Paul
Bingham. Subscribe through Time Designs
Magazine.
UPDATE MAGAZINE
UPDATE MAGAZINE
The Cambridge 288 Computer
A Sinclair Portable from England
A first impression Mini Review
By: Bill Jones
Upon returning from a vacation in Tuscon
a UPS carton was waiting with a new
"Cambridge %88 Computer" inside. Un-packing
a mew computer brings a mixture of
trepedation, eagerness, and anxiety. As the
Z88 was lifted from the box my first
impression was that it is not a "tiny"
computer as the ads would lead one to
believe. Later measurement revealed that its
desk space occupied is only slightly less
than the keyboard of the IBM AT, the Sinclair
QL, or the TS-2068. It is about seven inches
less in width than the IBM and the QL, but
about 3 inches deeper, and only an inch in
thickness. Strange, that a different shape
makes so much difference in portability! The
288 will fit into the smallest of briefcases
amd leave room for Sox, underware, a spare
shirt, and still more necessities.
The keyboard of the 288 is full size and
has seven extra function keys. The keys are
very sensitive.and has an adjustable repeat
rate, which also seems to adjust for touch
sensitivity. It also has "chirp on or off",
allowing silent operation.
The first operation after un-packing is to
install the four AA cell batteries, which
bring the computer on line, via a touch of
both SHIFT keys. This turns on the computer
and presents a SOFIWARE MENU. Since this
data base that you are reading was begun
about. 20 minutes after un-packing the 288, by
a new user, I will shift into REAL TIME, and
give you my impressions as this evening's
operation continues,
First, fingers must rest very lightly upon
the keys. They are sensitive to the touch.
Iam amazed that the "Pipe Dream" software
menu just popped on screen and let me "begin
typing imediately". I haven't even read the
user manual!
By the way, I am doing this at the dining
room table, and absolutely nothing is
attached to the computer- no power supply- no
monitor- nothing.
Just as I typed the last sentence a report
came on bottom screen, “End of Text". TI
assumed that this meant that FREE MEMORY had
been used up, which was not the case at all.
But believing that it was, I consulted the
APRIL 1989
APRIL 1989
index of the manual to find out how to
install the "128K Ram Cartridge" that I
bought with the computer. With that done I
had to read a bit more to find out how to
"transfer the data already typed" into the
Ram Cartridge. This proved to be very easy
and I will discuss that a bit.
The 288 manages its 64K "home ram
memory", plus three cartridge memory slots.
Each of the cartridge slots can have up to 1
mega byte of RAM. The third slot can have up
to 512K of EPROM memory. Keyboard control
allows the computer to control one of the
Mega Byte cartridge banks at a time. Or,
programming control within an operating
program can, in effect, control up to 3 Mgbts
of RAM Memory! Since I am a cheap skate, I
bought only a 128K RAM Cartridge and a 32K
EPROM Cartridge. When Ed McMann pays me the
promised million bucks, then I'll buy some
more cartridges. Anyway, the data file that
I started in “home ram" transferred easily
into Cartridge slot #1, and I'm continuing to
build the file. If I can do it with only a
cursory glance at the manual, then I feel
that Cambridge must have this Bank Switching
scheme perfected for idiot operation. My
son's IBM AT will only address 1 Mgbts, so
this 3 mgbts capability of the 788 is
impressive, even if I cannot afford the
cartridges right now.
The Next Day
After some zzzzz's the Jet Lag has
disappeared. Last evening I turned the 288
OFF by simply touching both SHIFT keys at the
same time. This morning I scanned through
the manual and found out that I didn't need
to turn it off, because after a few minutes
of NO KEYS touched, the 788 shuts itself off.
The 288 User Guide is 137 pages and 2/3 of it
is devoted to the "Built in Software". There
ace two Software Ensembles, PIPE DREAM, ard
DIARY. We will discuss this software
separately. Iwas more interested in the
Programming Aspect. The 66 pages devoted to
programming is enough for beginners but is
not adequate for the serious programmer. So,
I put ina call to Sharps' INC (804 746
1664), a 288 Dealer. Before the call was
over there were two advanced 288 books on the
We will review these books in a later
way.
article.
THE 288 BUILT IN SOFTWARE
PIPEDREAM is a Data Base Software, a Word
Processor, amd a Calculator. Calculations
6:
UPDATE MAGAZINE:
UPDATE MAGAZINE
can be integrated within the data base as it
is being generated. This is a very complete
software ensemble, and one that must be
learned in stages. I cannot begin to review
the software at this early stage of
proficiency, but I have already found that it
is very friendly, has many pop down menus,
and has an extensive HELP file. It also has
a very comprehensive "Printer Set Up"
section, which allows the user to change
set-ups to use any amd all printers. After
scanning the manual and beginning to use the
data base, I would say that PIPE DREAM is
about the eguilivant of WORD PERFECT for the
IBM, or the two QL programs "Quill" plus
"archive". Word Perfect retails locally for
around $800, which could be the comparison to
establish the value of PIPE DREAM.
DIARY is amother Built-In software
ensemble. To get the best mental picture of
this software, we must remember that the 288
"holds its data in RAM even when turned off".
DIARY is a Filing System, a Calender
Appointment schedule, a Data Organizer, and
has functions that are similiar to a Spread
Sheet. One of the many features is a "Data
Sort By Type". Example: Sort Mail Files,
etc. There is a similiar "Look Up" feature.
The data files created by both Pipe Dream
and Diary are FILED in memory that "does not
forget" when the computer is OFF. Already I
have four 'stages'’ of this document filed in
Pipe Dream 'susperded activities’. These are
automatic 'file saves" done as one quits to
another computer mode. While handy ard safe
to protect from data loss, these files must
be eliminated from time to time to conserve
filing space. Since I have only a 128K Ram
cartridge, filing space is limited to about
40 written pages of data. But suppose that
there were three "megabyte" cartridges
installed. Then the’ filing space would be
about Three Thousand Written Pages of Text!
We must chew upon that for a while, as all of
us are accustomed to LOSING all Computer data
when we turn OFF the computer. Ordinarily,
we start up and search for a file in disk to
resume working with.
Tt is difficult to compare DIARY with
another existing software, as its concepts
are for “permanent memory" files storage and
manipulation, But I'll take a stab at it by
saying that an IBM software having similiar
total functions would retail for around
$600...
The questions comes to mind: “Did I buy a
Computer and get $1400 worth of free
software?". Oc, "Did I buy the software and
get a FREE Cambridge 288 Computer to run the
APRIL 1989
APRIL 1989
software with?"
THE DISPLAY
The display is a "supertwist liquid
crystal", having 8 lines of 80 characters
each. Last evening I found that the display
was quite readable if one positions the
computer on a table at about the same
distance as reading a newspaper. But you
dont have to worry about the KGB spying over
your shoulder. One must be "in range" for
reading. This morning the sun is shining
through the window directly upon the 288 and
against the side of my RGB monitor which is
connected to the QL Computer. The sunlight
does not affect the 288 display. Actually it
seems to be enhanced. But I had to make
adjustments of the other computer's RGB
monitor to read it. I am not comparing the
288 display with a RGB monitor, but simply
saying that it seems to be satisfactory.
The 8 lines of the 288 display seems to be
adequate for orientation of data being
generated. The UP CURSOR pulls down earlier
lines as needed. I believe that the 288
display will be completely adequate for
portable use. I hope that, eventually, an
interface will be available for use witha
monochrome monitor for desk top operations,
mostly to design pretty graphics, charts, and
spreadsheet operation.
DISK DRIVE Versas CHIP STORAGE
Can you do without disk drive for portable
operation? Cambridge makes it very practical
to dowithout disk drive "on the road" by
providing permanent SAVE of data or programs
in EPROM. While my EPROM cartridge holds
only 32, other 128K ami 256K EPROM
cartridges are available, and Cambridge
Direct promises a 512K EPROM cartridge for
the future. Now I believe that this may be
confusing. "Dont you have to have a EPROM
programmer to put data or programs into
EPROM?" "YES, you do", The Z88 computer is
also a EPROM programmer.
Data or programs are SAVED to EPROM in
much the same manner as to RAM or to Disk
Drive. This is a NEW concept for portable
computers. One may leave town with a dozen
or more special programs in EPROM cartridges
to use during out of town operations. These
cartridges are small and may be carried in
the same briefcase with the 288. OR, BLANK
EPROM cartridges may be carried in order to
install and SAVE programs or data. When these
or the RAM cartridges are installed, they
UPDATE MAGAZINE
UPDATE MAGAZINE
disappear into the 288 cartridge ports. The
plastic door closes and the physical
dimensions of the Z88 is unchanged.
As my Wife am I were departing for
vacation, a man at the airport had a
"portable computer". While waiting we struck
up a conversation. His job involves visiting
and calibrating Hospital Electroniics
equipment. The computer he was carrying had
a3 1/2 inch disk drive and a package of
floppy disks calibration programs. His
computer was the size of a medium size
luggage piece, but thicker. I hefted it and
would say that it weighed about 40 pounds. A
similiar capability with the 288 would be in
a small briefcase and would weigh less than 8
pounds (including underwear and shaving kit).
COMPATABILITY With IBM XI/AT
(Also Apple Mac-
Drive)
Sinclair QL- AND Disk
Cambridge Direct makes available two
"LINK" Software cartridges, "PC Link", and
"Mac Link", With each is supplied a floppy
disk for the "linked computer". Sinclair OL
Dealers have "QL Link". These software
programs allows data and programs to be
transferred between types of computers. The
software also provides the Link needed to use
Disk Drive. For example; a 7288 file is
transferred to a IBM computer with "PC LINK".
Then the file is saved to floppy. Oc, a Word
Perfect file is transferred to the 288. Or,
a 288 file is transferred to a Apple Mac
computer with the "Mac Link" software, etc.
The 288 Operating System
There has not been a personal computer
developed within the past ten years that did
not use some form of BASIC Language as its
programming language. The 288 uses "BBC"
Basic. Aquick glance through the manual
shows BBC Basic to be a nice adaptation of
Dartmouth Basic, which allows the
abbreviation of key words and commands. For
example, DELETE is abbreviated with "del",
and LIST with just L. Most of the BBC Basic
terms are already familiar to us amd can be
entered with from one to three characters. I
will save PROGRAMMING for another article and
conclude by saying that a quick review of BBC
Basic indicates that the structure looks to
be easy to learn and rich in functions, Our
TS-2068 programmers will be at home here.
APRIL 1989
APRIL 1989
The 288 as a EPROM PROGRAMMER
Normally a good EPROM Programmer costs in
the range of $150 to $3000. These are
devices that transfers "organized programs or
files one byte at a time" to an EPROM. Each
byte transferred requires eight tiny fuzes in
the EPROM to be burned out with applied
voltage. As the process continues, and
thousands of fuzes are blown, the EPROM is
"programmed with the data supplied by a
computer“. The EPROM then is a device that
contains PERMANENTLY STICRED DATA. To erase
the data in an EPROMit is subjected toa
strong ultra violet light for a period of
time. This has the effect of reorganizing
the fuses so that the electrical lines to the
storage cells are again connected. Then the
EPROM can be programmed again. The 7288's
operating system provides for easy operator
SAVE of Data or Programs to EPROM, an amazing
capability for a portable computer!
PROGRAMMING SUPPORT
It appears that 288 Software programs will
appear in two forms, Z88 EPROM Cartridges and
Floppy Disks to be "LINK LOADED" fron either
a IBM AT/XT, a Apple Mac, ora Sinclair QL.
The latter concept will be the least
expensive, but will require the support of
another computer system for transferring the
288 program on disk to the 288 RAM, upon
which the user can SAVE to EPROM for
independant program operation.
Now to figure out how to FORMAT and PRINT
this file with my old Daisy Wheel printer. A
Parallel interface cable was purchased with
the Z88. The cable is small enough to carry
in the same briefcase, or in a pocket.
SUMMARY: It took me about 3 months to get
this far with the TS-2068 when I first
started with it. The QL required about a
month of study. That I could begin this data
base the same day as receiving the 288, then
finish it in a few days following, attests to
a very User Friendly computer and its
software. The whole kit amd kabocdle cost
less than $800, which is less than similiar
software would cost for most computers. This
788 is a true PORTABLE, where I haven't seen
another that really is portable. I believe
that Iwill be happy with the 288 for both
Portable and Desk Top use.
More details will come in
reports.
follow on
BJ-------------- ae
UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
» QL QUIRKS «<
John £. Juergens
18 Bryce Canyon Way
Pacifica, CA 94044
Bill Jones
c/o UPDATE Magazine
1317 Stratford Avenue
Panama City, FL 32404
Dear Bill, 7
The article on page 17, UPDATE, Jan '89, by Oscar Sensabaugh (another of your nom de plune's?), R.
Q. C. (Regular Old Curmudgeon?) presents a problem which has a solution. I am referring to the
statement that Oscar uses TWO QL "work copies" in order to implanent two printing devices, a Q
and a Smith-Corona printer AND he has to make his choice of printing devices BEFORE starting.
With four devices to output to (Star Ganini 10X, Panasonic Penwriter, Silver-Reed typewriter and
@ Talker) Oscar's solution, in aur case, would prove a bonanza for the microdrive cartridge
manufacturer(s). As a plank-owner in OMUG (Dedicated Microdrive Users‘ Group) I would like to
suggest a less cartridge-intensive option.
1, Delete QUMP_hob (The HELP file) fram your QLWP backup/"working copy" to give yourself
some room. When the choice is a $3.00+ cartridge or punching up Help on Fl, we opt for looking up
the answer in the manual and using that valuable media space for things like extra printer drivers
and often-used forms. Printer drivers consume 1 sector apiece and forms (a blank QLWP page with
Margin, Tab, Design, Header and Footers set to our liking) consume 5 sectors each.
2. Make all of the different printer drivers you need via the installation program. The
only problem here is that each driver has to be made with a separate run-through of that progran -
which takes a lot of time. After each driver run-through what you end up with is: (1) An
updated install_dat file which has all of the information about each driver you have made to date,
and, (2) A file called printer dat which is the new printer driver you have just configured.
a. Before going on to the second/next driver configuration copy the just-configured
printer dat file under the file name you wish to use; eg. Copy mdviprinter_dat to
mivi_QUPrinter_dat or copy mdvi_printer dat to mdvi_SnCorPtr_dat and go on to the next driver
configuration.
b. Do as many of these as you have need for and then make a copy of your QLWP "working
copy" copy inorder to spare you all of the agony you just went through when your original
"working copy" gives up the ghost. Deleting the HELP file (QLWP_hob) from your “working copy"
gives you about all of the roan you may need.
3. When you next bring up CLWP with your “working copy" AND before you send anything to
the printer select your driver of choice (SnCorPtr_dat for example) and do the following: F3,
(0)ther, (F)iles, (D)elete mdvl_printer dat, ENTER. ESC, (B)ackup, mdvl_SnCorPtr_dat, ENTER(to)
mdvl_printer_dat, ENTER, ESC, ESC. Yes, you CAN copy a file FROM mdvl TO mdvl!
The net result of these "exercizes" is to allow you to have your choice of printing devices WHEN,
WHERE and HOW you choose; a full range of options without having to reset and re-load if you later
change your mind and ALL on one cartridge.
re: (S)udden (L)ock (S)yndrome, page 11, UPDATE, Jan/'89
If I can extrapolate from your SLS experiences as well as my own there are
probably a great number of QL users out there who were relieved to hear you
voice that particular problem; we/they are not alone!
9
APRIL 1989 UPDATE MAGAZINE,
UPDATE MAGAZINE APRIL 1989
If the problem is what I believe it to be - momentary powerline interruption
or sudden voltage drop to the QL caused by a/several high load appliances
turning on - the generic fix is obvious: Attach the QL to a non-interruptible
power source. Notice that I did not say the fix was easy or inexpensive.
A few blocks away from us live a family with a large (spell it “expensive")
Apple investment. If they are “computing” when the furnace blower turns on,
immediately thereafter they are NOT computing. I haven't touched base with
them recently but unless they switched power supply circuits wintertime
computing is either out, very risky or they are cold.
As the power supply requirement to the ZX81/TS1000 is relatively simple, one
nine/ten volt DC supply at less than 1 amp, seven AA ni-cads in series, diode
paralleled to and trickle-charged by the supply adaptor worked very well for
me; no SLS thereafter (at least none caused by the power supply.)
With the QL things are not that simple: Two supplies, 9 VDOC, unregulated, at
1.8A and 15.6 VAC at 200 ma vitalize the computer according to the specs glued
to my power supply.
On the face of it one solution would be to plug the QL power supply into a 75
watt (min. AC output) DC to AC converter operating froma 12 volt gel-cel,
motorcyle or vehicle battery.
A quick look at my pile of catalog sources reveal that (besides the fact that
things have never been the same since Allied Radio, Lafayette and Olsen
stopped sending out catalogs) Tripp Lite will sell you their SB-200 (not
including the battery) for $240 through Fordham, 260 Motor Parkway, Hauppage,
NY, 11788 (516) 435-8080. The literature claims computer use but it also
mentions a 10 ms switch-over time which seems a bit slow to me.
A non-generic but less expensive fix is to backup your deathless prose often
and regularly to MDV or disk. It wont eliminate resets but it will eliminate
a lot of time and re-writing from scratch.
As now may be expected, there is a problem with often and regular backups to
MDV as well: If there is a power outage, as opposed to a momentary dip, and
if you have left the backup cartridge in the MDV there is a good chance that
the outage kapooted the cartridge as well.
Have you noticed how problems beget fixes which beget problems ...! Therefore
take the cartridge out after each of the often and regular backups remembering
to replace before the next. As we do not have a disk drive I do not know
whether the same caution may apply.
I have experienced two other types of problems one of which LOOKS like SLS.
When working in QLDB with a large program and data base a call to SELECT,
UPDATE or APPEND at times will produce SLS symptoms. Many the times in days
long gone I thereafter reset and started over again; that is, until I
accidentally stumbled upon the fix of just WAI TING, up to two minutes
in some instances, and the program in its own sweet time continues.
I don't know for certain what happens but guess that at certain memory-used-
points Archive must re-write or re-arrange itself somehow and waiting it out
works 99% of the time. To solve that problem I added a couple of dummy
procedures full of REM statements to the program and when the problem occurs
(always after I have modified the program) to go back into EDIT and either add
to or delete a dummy, then run it and see if the wait still occurs. This cut
and paste method is neither very scientific nor high tech but it does work.
1o
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
The other problem occurs with QLSS: Our tax program occupies 150 sectors and
during the initial LOAD, at about the 75 sector point, LOADing stops with an
"Qut Of Memory" error message. As our QL has a 512K external Miracle board,
Out-of-Memory is simply not consistent with reality - I hesitate to call our
computer a liar as I am dependent upon it and have to work with it and in my
secret heart know it reads my vibes and reacts in a mean, vicious and totally
amoral fashion to real and fancied slights (including calling it a liar!)
The QL Manual and the Miracle installation sheet, as far as I have ever been
able to determine, are simply silent on that state of affairs - well, not
exactly: The Error Handling section in Concepts does say that that message
means that QDOS and/or SuperBasic has insufficient free memory which of course
is what one would gather from the error report in the first place which of
course is simply not true in our case. And, before I get into an endless
loop, I just wish to say that the fix is simple: Press Space to get rid of
the error message, then F3, (L)oad file_name again just exactly as you did at
the initial start.
Strangely, once the double-LOADing is successful (which it inevitably is) a
re-LOAD of the same program occurs without the interruption encountered in the
initial LOADing. This impels the thought that the re-starting of the initial
LOAD probably had something to do with memory re-allocation. What is puzzling
is why a manual re-start is required when an automatic software re-start could
have been implemented?
You might, Bill, consider christening a new column entitled QL Quirks. It
just might turn into a book.
Commento: Har har! ‘ole Tex'll get a kick outa this~un! His hide is the thickness
of a smitty's aporn, so he wont be offended. Oscar (R.O.C.) began computin in the
country with a ZX-81, then a TS-1000, then a TS-2068, and a couple of X'mas trees ago his
stocking had a QL in it. So, he has 'curmudgeoned' -mst of Sir Clive's stable of
critters. As he discovers something he tells us bout it with a mix of Morse Code and
Texas twang. He has fun a dunning at it and we most of us enjoy deciphering the code to
get at the message. Couple 'o years past ole Tex almost left us for the happy hunting
grounds of devout curmudgeons. He musta thunk that he was endowed with the ability to
fly. Anyway, he crash landed on the tarmac from 12' atop an 18 wheeler and nearly kilt
hisself. Took mor'n a year of laying low letten the energy flow back inta his vittals
afore he could take up curmudgeoning agin. Whether you dig his style or not there is
always a tip in there for some who are streevin and strainin to learn it durn it. By the
way, beginners flying lessons stould start from the door steps first and graduate to
higher altitudes as skills develop.
About "QL Quirks": I do dig that family's problem with their Apple. S.L.S. is a
quirk not confined to the QL and whose genealogy traces back to Mr. Franklin's kite
flying adventure. Electricty comes and goes. When it goes, S.L.S. grabs us. Should
say "when it waffles or waivers". Funny that a respectable Engineer will neglect to
account for a non-perfect world of pure sine waves, unaffected by power loading,
lightening, buss switch over, neon lights switching on and off, and yes birds alighting
upon the power lines.
Since Florida is where most of the birds fly for the winter, and they are always
lighting upon the power lines, and that causes S.L.S. with some QL computers, I am happy
to report that Dan Elliott has war: ix for the s' ome, Dan has my back up QL
now to do the “Outside Power Regulator Job" on it. He says that the Power supply is so
effective that one can do a quick OFF and back ON without the QL dumping. Also, an
ON-OFF switch comes with the fix. So dont buy that $350 AC/DC converter, or that $900
constant AC Back Up supply. Let ole Dan do it for about $50 plus or minus a few. Dan
Elliott, RR-1 Box 117, Cabool, MO 65689.
OPINION: Somebody needs to revise the Quill Proc to stop that automatic MDV save
when Quill decides to do it. At least it stould give you a warning and let YOU decide.
This Big Bad Suprise comes when operating without extra memory and you get about three
pages into a cata file generation.
John, thanks for the Quirks. Dig the Header afore your letter. This could be the
place to confine our varying forms of humor, as well as Quirk Quacking. You started it,
and now others can join in, ToTex: I apologize for putting you under the Quirks
Column, Did'ja ever learn to fly?
1
APRIL 1989 UPDATE MAGA7.T NE
UPDATE MAGAZ* NE
TS-2068 DATA INPUT
-a utility for:
Data Base Generation
Keyboard Reading
Character Concatenation
Screen Display
Full Editing
This is an audacious attack upon the mst
famous weaknesses of the TS-2068, slow data
input and poor screen editing. The result is a
INPUT SECTION of programming that can be used
for many purposes. Programmers have overcome
the problems mentioned by developing their own
independantly running Machine Code in RAM.
Such softwares as Mscript, Tasword, and
ProFile, do anice job of Display Control and
Data generation, but at great cost of FREE
memory. These code utilities are proprietary.
Even if theic use were free, they would lack
the flexibility for user applications.
there has been a tenancy by
programmers to NOT use the inherent abilities
of the TS-2068 for DATA MANAGEMENT, The
"TS-2068's way" is to control data in the
Variable area of memory". Most programmers
develop an independant control system for data,
using machine code to-place the data into high
ram, edit the data, etc. While this may be
somewhat faster, and more efficient for ‘some’
functions, it is redundant and FREE Memory is
reduced by the amount of code used.
We TS-2068 users have never had a flexible,
easy to use utility for "Input Data Control".
Look back all you want into Sync, Syntax, and
existing magazines. The cupboard is bare.
Generally,
TS-2068 DATA INPUT is a utility that does
all of the functions listed in the above title,
Moreover, these functions are done "the TS-2068
way", using the Variable file. This allows
easy flexibility for using the utility in
almost any Basic Program to enhance typing
input and editing.
DATA INPUT takes advantage of the ROM
routine "K-STATE" for fast keyboard reading.
The display management is done using Systems
Variable SPOSEN, which stores the X,Y
coordinates of the "next print position" in two
addresses. Then each key touched is printed to
screen and concatenated to a typing buffer.
The typing buffer is the simple string "US".
We will now take a look at the "Nucleus" of
the Data Input utility, which are two routines
in Basic.
The SPOSEN ROUTINE: The purpose is to
display the last 148 characters of US to screen
ard to establish tracking variables. A=vert
print position. Bhoriz print position.
AI-LEN US$ in the beginning ard will be changed
toltrack the cursor so that Al=the US$ chr
APRIL 1989
ho
APRIL 1989
number to the left of the cursor. The SPOSN
routine needs to be used only once upon entry
of the PEEK K-STATE typing input routine.
SPOSEN
100 IF LEN U$<= 148 THEN PRINT AT 0,0;US;
102 IF LEN U$>148 THEN PRINT AT 0,0;U$(LEN
US$-148 TO);
104 LET A=24-PEEK 23689: LET B=33-PEEK 23688:
IF B=32 THEN LET B=0: LET A=A+1
106 LET A1+LEN US$
Lines 100 and 102 in the above routine is for a
32 column screen. Replace "LET A=24- with 48",
and "LET B=65~" for an implemented 64 colum
screen.
Next, the PEEX K-STATE routine to read the
keyboard. K-STATE is first POKED to its active
status. Then the ROM routine reads the
keyboard until a key is touched, then the
Character code is assigned to var "c". If the
chr code is less than 32 the key read loop is
escaped from to line 158 (EDIT). I£ not, the
character is concantenated to U$, printed on
screen, a Cursor is printed, and the SPOSEN
vars are incremented. GO TO 150 gets the next
character.
K-STATE Routine
150 PORE 23611, 220
151 IF PEEK 23611<221 THEN GO TO 151-
152 LET C=PEEK 23560: IF C<32 THEN GO TO 158
153 LET US=U$+CHRS C:PRIN AT A,B;CERS C;"_";
154 LET B=B+1:LET Al=Al+1: IF B=32 THEN” LET
B=O:LET A=A+]
155 GO TO 150
158 STOP:REM See the program TS-2068 DATA
INPUT for the complete, ready to use, utility.
While the above two routines are fairly
fast, and I have used them for years in the
Smart Text software, a typing speed greater
than about 40 words per minute can over-ride
the input. The K-STATE loop is slowed by the
basic programming to concatenate, the LETS, and
the IF THEN escape. So, I_ask Mr. Don Lamen
SINCUS, to provide a Machine Code clone of
these two basic utilities. The next 4 pages
comprise Don's MC utility and it's
documentation. Don's MC utility "Concat" does
everything that the SPOSEN and K-STATE Basic
utilities do; using only 196 bytes of cae.
So, we put the code in the printer buff area,
starting at adr 23296. This left me the task of
developing a FULL EDIT function to begin at
basic line 158. After Don's code is explained,
the whole BASIC utility "TS-2068 Data Input"
will be listed and commented upon. Once Don's
code is installed in the Print Buff, just one
Basic line is needed to replace all of the
lines of programming of the SPOSN and PEEK
K-STATE routines. That line will be <150
RANDOMIZE USR 23334>
UPDATE MAGAZINE
UPDATE MAGAZTNE
** CONCATENATION **
Dear Bill,
Here is the machine code routine that I came up with in
responce to your letter of Nov. 30, 1988.
On the B side of this tape is a Demo program containing the
actual machine code routine, support sub-routines and supporting
BASIC lines. I have put several STOPs in the BASIC to allow you
to follow the various steps.
This text file consists of five parts as follows:
1. The BASIC support.
2. The Machine Code Entry Points.
3. The Asembly Listing.
4. A HEX Dump of the Machine Code.
5. A DEC Dump of the Machine Code.
; BASIC SUPPORT
1 REA * concaTENAT1o& * 1.0, 75
by Don Lamen, SINCUS 12-14-88 -
2 REM ** DO NOT USE PRINTER **
3 REM * For a Demo GO TO 998 **
150 REM ** CONCATENATE **
151 RANDOMIZE USR 23399
152 STOP
153 REM :
157 REM * EDIT AND/OR PRINT VARIABLES *
158 STOR: .LET A = PEEK 23299: LET B =
PEEK 23298: LET C = PEEK 23300: LET Al =
PEEK 23296 + 256 * PEEK 23297: STOP
159 PRINT '"A (LIN): ";A'"B (COL): "7B"
"C (CHR): "sC;" ("% CHRS C7")"'"Al ( LEN
us): "“;Al: STOP
160 GO TO 151
996 REM
997 REM ** INITIALIZE US$ **
998 LET U$ = ""
999 REM ** CLS AND PRINT LAST 148 CHRS.
ae
1000 RANDOMIZE USR 23334
1001 STOP
1002 LOAD "Concat" CODE
1003 LIST
MACHINE CODE ENTRY POINTS
(23296) 5B00 VARL ; LEN U$
(23298) 5802 VAR2 ; (SPOSN) LO: COL / HI: LIN
(23300) 5B04 VAR3 ; CHAR. CODE...
09 ADD HL, BC ; End of US$
AT AND A ; RES Carry Flag
EDS2 SBC HL, DE + Go back 148
EB n EX DE, HL ; DE -> lst Char.
44 LD B, to be printed.
4D LDC, L ; 148 bytes
(23367) 5847 CDDB21 PRINT: CALL 21DB, PR-STRING
ED4B885C LD BC, (SPOSN)
3618 LD A, 18 ; 24 dec.
90 SUB B
47 LD B, A
3621 LD A, 21 ; 33 dec.
91 suB C
4F LDC, A
FE20 cP 20 ; New line?
1
APRIL 1989 a UPDATE
APkil 1989
MAGAZINE
UPDATE MAGAZ TNE
(23389) SBS5D
ENTRY POINT 2:
(23399) 5B67
(23423) SBIF
(23430) 5B86
(23448) 5B98
(23454) 5B9E
(23468) 5BAC
(23480) 5BBB
(23487) SBBE
(23490) 5Bc2
APRIL 1989
APRIL 1989
2003 JR NZ, STORE
OE00 LD C, 00 7
04 Inc B :
£D43025B STORE: LD (VAR2),BC ; Store Param.
CD185B ‘ALL 5B18, PR-AT
3E5¢ LD A, 5F 7 Cursor
D7 RST 10 } Print Cursor
65 bytes
(CONCATENATE )
3A3B5C CONCAT: LD A, (FLAGS)
FEDD cP DD 7 221 dec.?
38F9 JRC, CONCAT ; Wait for Key
3A085C LA A, (LAST K)
SF LD E, A 7 Save Char. in B
3EDC LD A, DC 7 220 dec.
323B5C LD (FLAGS), A
7B LD A, E } Char.
FE20 cP 20 7 Is it < 32 dec.
300A JR NC, CONT ; No! It is OK
219600 LD HL, OO9E 7 I£ < 32 dec. GO
TO Line 158 in
BASIC.
cCDD616 CALL 16D6, LINE-ADDR
22555C LD (NXTLIN), HL
co RET
32045B CONT: LD (VAR3), A + Save Char.
cD055B g CALL 5B05, FIND-U$
23 INC HL
46 LD C, (HL)
34 INC (HL) ‘
23 INC HL
46 LD B, (HL)
2001 JR NZ, ADVAN
34 INC (HL)
09 ADVAN: ADD HL, BC ; HL ~> Last Char
cpB812 CALL 1288, ONE-SPACE
3A045B LD A, (VAR3) ; Get Char.
23 INC HL
23 INC HL
77 LD (HL), A 7 Add it to U$
ED4B025B PR-2: LD BC, (VAR2)
CD185B CALL 5B18, PR-AT ss
3a045B ¢ a EDA, (VAR3) ; Get Char.
D7 RST 10 + Print it to the
Screen.
3ESF LD A, SF 7 Cursor
D7 RST 10 3 Print Cursor
2A025B LD HL, (VAR2)
2c INC L
7D LD A, L
FE20 cp 20 7 Is it 32 dec.?
2003 JR NZ, UPDATE
2600 LD L, 00
24 INC #
22025B UPDATE: LD (VAR2), HL ; 'AT' Parameter
2A005B LD HL, (VAR1) ; LEN US$
23 INC HL
22005B LD (VARI), HL
18A3 JR CONCAT
93 bytes
TOTAL NUMBER OF BYTES = 196
14
UPDATE MAGAZINE
UPDATE MAGA7 TNE
APRIL 1989
CONCAT
(23296)! 90 «00 00 00 00 2a
(23304) je Fe 55 C8 CD “20
(23312) 18 F6 CD A6 08 O1
(23320) 21 3B SC CB 8E 21
(23328) ca 86 CD B2 05 C9
(23336) 5B cD 05 SB 23 4B
(23344) BD 43 00 58 23 EB
(23352) 00 a7 ED 42 09 30
(23360) 09 A7 ED 52 EB 44
(23368) DB 21 ED 4B 88 SC
(23376) 90 47 3B 21 91 4F
(23384) 20 03 OF 00 04 ED
(23392) 58 CD 18 5B 3E SEF
(23400) 3B «SC: «CFE «6DD O38 «FO
(23408) 5c SF 38 oC 32 3B
(23416) Fe 20 30 OA 2t 9E
(23424) ve 16 22 55 SC C9
(23432) sB cD 05 5B 23 46
(23440) 46 20 01 34 09 cD
(23448) 3A 04 5B 23 23 77
(23456) 02 58 CD 18 5B 3A
(23464) D7 3B SE D7 2A 02
(23472) 70 FE 20 20 03 2E
(23480) 2202 5B 2a 00 5B
(23488) 00 5B 18 A3
Total BYTES = 196
DEC-DUMP
cONCAT
(23296) 0 o o 09
(23301) 75 92 126 254
(23306) 200 205 32 23
(23311) 24 246 205 166
(23316) 1.0 0.433
(23321) 92 203 142 33
(23326) 92 203 134. .205
(23331) 5 201 205. 18
(23335) 205 5 (91 35
(23341) 35-70 «237-67
(23346) 0 91 35 235 33
(23351) 1480-0 (167 237-66
(23356) 9 48 8 235 9
(23361) 167 237 82 235 68
(23366) 77° 205 219 «33-237
(23371) 75 136 92 62 24
(23376) 144710 «62033145
(23381) 79° 254 32 32 2
(23386) 14.0002 4 23767
(23391) 2 91 205 24 91
(23396) 62 95 215 58 59
(23401) 92 254 221 56 249
(23406) 58-8 «492 «9562
(23411) 220 50 59 92 123
(23416) 254 32 «48 «1033
(23421) 158-0 «205 «214-22
(23426) 34.85 «92-201 50
(23431) 4 91 205 5 91
(23436) 35 78 52 35 70
(23441) 32, 1 52 9 «205
(23446) 18418 88492
(23451) 35°35 «119 «237° 75
(23456) 2 91 205 24 91
(23462) 58 4 91 215 62
(23466) 95 215 42 2 91
(23471) 44125 254 32 32
(23476) 3.46 0 36 34
(23481) 2 gl 42 Qo oi
(23486) 35° 34 «20 «9124
(23491) 163
Total number of bytes = 196
15
CHECKSUM
CHECKSUM
APRIL 1989
UPDATE MAGAZINE
UPDATE MAGA7. TNE
TS-2068 DATA INPUT, TYPING INPUT TO SCREEN WITH FULL
100 REM * TS-2068 DATA INPUT *
Donated to Public Domain by---
UPDATE Magazine and Don Lamen, SINCUS .
140 INK 7: PAPER 0:
R 100: OPEN #4, "dd":
NOOMIZE USR 100: POKE 16096,0: RANDOMIZE USR 100:
POKE 16092,0: LPRINT : LET u$="""
a
150. RANDOMIZE USR 23334 —~T#@bo TYPI9G
158 LET a=PEEK 23299: LET bePEEK 23298: LET c=PE —
EK 23560: LET al=PEEK 23296+256*PEEK 23297
159 |F c<>12 THEN GO TO 230
160 LET b=b-f: LET al=al-1: IF b=-! THEN LET b=
31: LET asa-1: IF a=-1 THEN LET a=0
162 LET u$=u$( TO al)tuS(al+2 TO )
164 1F LEN u$>al~bt+l-a*32+404 THEN PRINT AT a,0
juSCal-btl TO);
166 1F LEN u$>al-b+1+403 THEN PRINT AT a,'
I-bt} TO 404);
167 RANDOMIZE USR 23334
230 GO TO (c>31)*300+(c=7
75+( c= 10)*265+( cel 1)*255#(c#1Z)"370+( c=13) *150H( 6
usa
235 POKE 23611,220
238 IF PEEK 23611<221 THEN GO TO 238
240 LET c=PEEK 23560: POKE 23611,220
250 GO TO 230
255 LET aza-1: LET al=al-32: IF a<O THEN LET a=
QO: IF al<b THEN LET al=b
256 IF LEN uS<al~b+i+404-a"32 THEN PRINT AT 0,0
juS(al-bti-a#32 TO );
257 1F LEN u$>al~bt+1+403-a"52 THEN PRINT AT 0,0
juS(al-btl-a"32 TO al-b+1+404~a*32);
258 PRINT AT a,b; INVERSE 1; OVER 15"
235
265 LET asati: LET al=al+32: IF al+128>LEN u$ TH
EN PRINT AT at2,0; FLASH 1;"To edit here Touch E
NTER "; PAUSE 0: RANDOMIZE USR 23534
266 IF a>t} THEN LET a=12: PRINT AT 0,0;uS(al-b
+1-384 TO al-b+96);
270 PRINT AT a,b; INVERSE 1; OVER 13"
235
275 LET al=al+t; LET b=b+l: IF b=32 THEN LET b=
0: LET asatt: IF a>21 THEN LET aa-I: LET b=3!:
LET al=al-1
280 IF ALLEN US THEN LET Al=Al-I: LET 8-8-1: |
F B=-1 THEN LET B=31: LET A=A~1
285 PRINT AT a,b; OVER 1 GO TO 235
290 LET beb-1; LET al=al-1: IF b=-1 THEN LET b=
31: LET aza-1z IF as-1 THEN LET b=0: LET a=0: LE
Talaalti
=14y"29z6+(6<7)*2926
PEEK &
”n
GO TO
——-
: GO TO
APRIL 1989
BORDER 0: CLS : RANDOMIZE US
RANDOMIZE USR 100: LOAD "con
cat.CI"CODE : RANDOMIZE USR 100: OPEN #3,"Ip™: RA
jutho Steed TH
Curso& u
APRIL 1989
EDIT
-NOTES=
~ LodD Cod& -
Version & PlinliR
—bkt AELLO 0%
ate LKDdeoSs
Ahk KK dos
P. Ling FEED —
Dig ex. inTenFac€ ~
inTANIE Uf - The T0174 AHER
fun CodE Tel BREAK but Fo Line (5
gt Basic VAAL Ftsmm Code
EIETE CARIL
Cha tt
ait
pat
2KE Md
— iF Mer 0
jE Debehe
pare. dille bist cha.
Baanches a Boolean Logie
STATE 72 Rend, Kuz bted
ASCO
phar AeTion
Cuk Son Doom Ando
addin
Move Curso hes 47 wiih
Nigat > Achow KEY
Ro
be aSog LEFT UTA
Move C4XSo€ La ar y
LetT-«a— AX
16
UPDATE MAGAZINE
UPDATE MAGAZTNE
295 PRINT AT a,b; OVER 1;"";: GO TO 235
300 LET u$#u$( TO al)+CHRS ctu$(alt! TO ): LET b
sb+i: LET alsal+t: {Ff b=32 THEN LET b=0: LET a=a
+1
301 IF LEN u$<al-btI+VAL "404"-a"52 THEN PRINT
AT a,O0;uS(al=b+! TO );
302 IF LEN u$>al-b+1+403-a%32 THEN PRINT AT a,0
guS(al-bti TO al-b+1+404~a"52) ;
305 PRINT AT a,b; INVERSE 1; OVER 1;"_"3: GO TO
235
31: LET asa-1: IF a=-1 THEN LET a=0
372 PRINT AT a,b;" "3: LET uSsuS( TO al)+u$(al+2
TO)
374 1F LEN u$<al-b+1-a¥32+404 THEN PRINT AT a,0
pus(at-bt! TO);
376 IF LEN u$>al-b+!-a*32+403 THEN PRINT AT a,0
pusCal-bti TO 404);
378 PRINT AT a,b; OVER 13"_"
390 PRINT AT 19,0; INVERSE 1;"BLOCK INSERT"; INV
ERSE 0;" Type String, ENTER’ INPUT z$: CLS : LET
uS=u$( TO al)+z$+u$(al+i TO ): RANDOMIZE USR 233
34
: GO TO 235
peered
370 LET b=b-1: LET al=al-l: IF b=-1 THEN LET b=
APRIL 1989
[NTER1 0%
DElIeTE
Tew
1M MidsT a
Block mns€aT with BolT KEY
aT Ta Cutson PoSiT1n.
TS-2068 DATA INPUT
“DATA INPUT" provides a fast TURBO typing speed and data presentation on screen.
The typed charactérs are collected in "U$" and called "the typing buffer".
length of the typing buffer is un-restricted.
as the arrow keys or EDIT will escape TUREO mode and enter the EDIT mde.
The data
Any “un-printable" character entry, such
IE just a
single character DELETE is done with the DELETE key, TURBO is re-entered. Otherwise,
after EDITING, touch the ENTER key to re-enter TURBO mode.
Each time that TURBO is re-entered, the last 148 characters of the typing buffer
(US) is presented, giving 4 1/2 lines of text for orientation. The Arrow keys move the
cursor up through the screen text for interior EDITING. UP ARROW will pull down earlier
typed lines of text all the way to the first data line for editing.
‘The TURBO mode uses Don's code by RANDOMIZE USR 23334 at line 150. During EDIT mode
the second "PEEK K-STATE" (in BASIC) is used at line 235. The edit mode is slowed by the
large number of IF THEN Conditionals in line 230.
There are 10 IF THEN logicals
expressed in Boolean for its faster CFU evaluation. Though the K-STATE loop is slower
than the same loop in Machine Code, the EDIT mode does not need such speed.
APRIL 1989
For fast lengthly INSERTS within the text, a touch of EDIT provides BLOCK INSERT.
Block insert uses the standard TS-2068 INPUT at screen bottom. This allows the INSERT of
a string of typed characters, or one may erase the Quotes and enter a simple string or
characer array cell to BLOCK TRANSFER segments of other data bases. Example: To BLOCK
INSERT data contained in "H$(3)" character array, just run the cursor up to the place to
insert, then touch EDIT. Then erase the input quotes and enter H$(3). The BLOCK INSERT
mode also allows the entry of graphics characters, which would not be possible to enter
in any other mode.
In line 230, one of the conditionals is for the use of CAPS and SYM SHIFT together
to ESCAPE and GO TO line 2926, which is not present. This line number is the QUICKIE
MENU of the Smart Text Software. For Aerco FD-68 and LKDOS Smart Text owners, this DATA
INPUT utility may be used to replace all program lines of Smart Text from 150 through
399. Oliger DOS owners need to re-locate the code to either high RAM or to the unused
SYSCON addresses. For other uses, the line number for ESCAPE may be changed from 2926 to
the appropriate program line number.
Line number 140 is given only to allow the utility to work as stand alone. This line
may be omitted when DATA INPUT is used with another program that initializes a DOS with a
printer driver. Somewhere early in the program the "concat.B1"CODE must be loaded. This
code is SAVED at address 23296 <SAVE "concat.BI"CODE 23296,196> and is 196 bytes in
length. This is in the TS-2040 Print Buffer area.
The code in the print buff will be wiped out by the command LPRINT if there is no
Centronics Printer Driver code resident in the system. However, after printing data with
the TS-2040, the code may be re-loaded by <LOAD "concat.C1"CODE>. Then <GO TO 150>. The
only requirement for the code is that US$ must either be initialized or already contain
data. <LET U$=""> will do it.
17
UPDATE MAGAZINE
UPDATE MAGAZ NE
APRIL 1989
EARL V DUNNINGTON
4356 KING THEODORE DR.
BOYNTON BCH., FL 33436
PHONE 407-732-6219
SERIAL PRINTERS; THE FDD 3000, AND TOS
BY EARL DUNNINGTON
This article was written specifically
for connecting a Brother EP-22 tupewriter
printer or the SMITH~CORONA DEVILLE III
tupewriter printer with the Messenger
Module to the Zebra FDD 3000 Disk Drives.
However, the article should be of help to
anyone in connecting a Serial printer to
the TS 2068.
As the 2048 does not have a Serial
Port, the first requirement is a Serial
Interface that matches the type of serial
printer that you have. The second require-
ment is an Interface Driver program.
There are two main types of serial
printers. Those that require a serial
interface or port specifically designed for
that printer, such as the OKIMATE 20 with
the Commadore Plug and Print Module or the
TS 2040. In the case of the 2040, a serial
port is built into the computer connector
block and the driver program is in the ROM.
The other main type of serialprinters are
those that require a RS 232(C) serial
interface or port for the computer.
The FDD 3000 disk drive package has
two partial, nine pin, RS 232(C) interfaces
that are referred to as the Serial
Communication Ports (SCPs), CHA & CH_B.
The Timex Disk Operating System (TOS) has
the serial interface Driver Programs built
into it. The TOS DEMO VA.2 disk has a
program to support the LPRINT and LLIST
commands, designed for use with CH_A. There
is also a Keyboard Echo program for use
with CHA.
There are three types of RS 232(C)
serial printers, those that use hardware
handshake, those that use software
handshake, and those that can use either
type of handshake. Where possible, it is
best to use hardware handshake protocol due
to differing time required to empty the
printer buffer and to do a carriage return/
line feed. All three types of RS 232(C)
printers require only three wires to
connect the interface to the printer.
HARDWARE HANDSHAKE:
Interface Printer
Transmitted Data ~ Received Data
APRIL 1989
Data Terminal Ready-----I ‘Data Terminal Ready
Signal Ground~-------------— --Signal Ground
SOFTWARE HANDSHAKE:
Interface Printer
Transmitted Data —--Received Data
Received Data Transmitted Data
Signal Ground: Signal Ground
I have purposely left out the pin
numbers as those who do not have the FDD,
the EP-22, or the Messenger Module and
typewriter must determine these from their
RS232 interface manual and their printer
manual.
The standard pin numbering for a nine
pin male connector and a 25 pin male con-
nector when viewed looking at the front of
the pins is as follows:
EITC IIS
JIE IEE
#12345%
#6789 *
REEERERER
FEI UOTE ITAA SI.
#123 4 5 6 7 8 910 11 1213 %
* 14 15 16 17 18 19 20 21 22 23 24 25 *
EITHER IE
If you view the female connector from the
back end ( where the wires connect) the
numbering on them will be as shown.
The proper connections for the FDD
3000 interface A to either the Brother
EP-22 or the Messenger Module serial input
are?
Interface Printer or Module
9 pin female B25 pin Male
Pin Name Pin Name
2 ens 3 ORD
5
ee ? SG
UPDATE MAGAZINE
UPDATE MAGA? NE
The connectors are available at Radio
Shack?
Female 9 pin #276-1538 $2.49
Hood 9 pin #276-1537 $1.99
Male 25 pin 8276-1547 $1.99
Hood 25 pin #276-1549 $1.99
Any three wire cable up to 50 feet long can
be used. You may wish to use a joystick
extension cable available from Radio Shacks
cutting off and discarding the male con—
nector. The wire colors on the one I have
are Pin 2-red, Pin S-green, and Pin 7 is
grey. To be safe you should check them.
Now that you have your cable made,
plug the 9 pin connector into the A channel
serial interface of the FDD 3000. As you
look at the back of the unit, it is the one
on the right and is labeled. Making certain
that all power is off, plug the other end
into the EP-22 printer or into the serial
input of the Messenger Module.
Are you ready to use your printer? Not
really as you must first configure the
interface driver program for your printer.
This is done in TOS using the FORMAT *
command,so you should be sure that the disk
is protected by the write protection tab.
After powering up the computer and then the
FDD 3000, insert the DEMO disk in the A
drive. When the drive light goes off, type
in the following command:
FORMAT *":CH_A"
then press ENTER. You will be prompted to
key the required answers for your printer.
The EP-22 has only the choice of 75 or 300
Baud rate. The character bits are eight and
one stop bit. No parity check. The
Messenger Module has dip switches for
optional settings. Using the configurations
as set by the factory you would answer the
questions as follows?
QUESTION EP-22 MODULE
1, Text or Bytes?
2. Auto line feed?
3. XON / XOFF?
4, Input with wait
5. Baud rate?
6 Parity?
7. Stop bits?
8. Bits/char?
upznzzz4
upmezzz4
After all the questions have been answered
you are back in BASIC. Type int
GO TO **tDEMOFUTIL®
then press ENTER
APRIL 1989
APRIL 1989
There are three utility programs on
the TOS DEMO disk that can be used by a
serial typewriter printer. "TYPE" ( no
extension ), a keyboard echo program.
"LPRINT” ( no extension ), a BASIC loader
for the machine code LPRINT and LLIST
support program for the SCP CH_Ay
named "LPRINT.COD* CODE 23297.
Power up the typewriter. With the
EP-22; use the CP mode, change from the
typewriter to printer mode, and press the
CONT button. You should now see in the
printer display "ON LINE 300 BAUD".
With the Messenger Module and the
Smith-Corona typewriter, set the pitch
desired, turn on the keyboard, hold down
the CODE key and press the “P* key. The
red program light should come on.
Type into the computer:
LOAD *"TYPE®
Then press ENTER. When the program has
loaded, the prompt “Do You Have a Printer
(Y/N)? will appear on the screen. Answer
with a Y and when the cursor appears press
ENTER. You should now be able to use the
computer keyboard and both the screen and
printer will echo the key that is pressed.
The ENTER key acts as a carriage return/
line feed. If the program hangs up, the
typewriter was not on line, the connections
are bad, or the cable is wired incorrectly.
If all goes well, break out of the
program using the BREAK key. Type int
CLOSE # #1
Then press ENTER. Tupe int
LOAD **"LPRINT®
Then press ENTER. When the program has
loaded, type in?
RUN
Then press ENTER. You should now be able to
use the normal LLIST or LPRINT commands.
You can now avoid reconfiguring the
SCP CHA by FORMATting new disks. The DEMO
disk also has a utility program named
"LoSys" that will allow you to change the
default setting on existing disks, after
configuring a SCP, without losing the data
on your disks.
UPDATE MAGAZINE
UPDATE MAGAZINE
See “index Min?én” 14 the_Ja
BL
10 CLS:CLS#2: LIST
Jean-Claude Touzin
C.P.41 La Sarre Prov. Québec
Canada J9Z 2X4 T61. (819)333-2175
APRIL 1989
Seite CC CL bt O Ce CCC CO CCL LOGE CEL LLL is
To: UPDATE MAGAZINE
1317, Stratford Ave., Panama City,
FL 32404
eeeaeeseesegseeneeRgaseasEesEEsEeEeeS es Ease EseEsEecesEeeeeseeasS
Dear Bill,
UPDATE jan.
9.2.89
89 was my second issue and I like the open spirit
and warm feeling that you put in this mag.
As a small contribution, I send you a new listing for the QL
index program that appeared on page 61, with some
commentaries.
Concerning the way to terminate a loop in superbasic, the
standard is to use END FOR or
you want to terminate a FOR loop for ex.
In this case, QDOS will jump from the
statement.
You can also use EXIT to jump after the
END REPeat.
NEXT is used when
before the END FOR.
NEXT to the FOR
END FOR or END REPeat
statement (see listing for example of this).
I removed the
on the same
Concerning the linefeed,
my printer always print
have to change dipswitch for going to and
oe
DIM statement for each variable that you
INPUT statement in
the
ana
Another thing to note is that you don
how powerful is the
concatenate(?) all sort of thing in
numeric variable, string variable
variable(see listing)?
Lastly,
easy way is
loop,
program.
to engiobe everything in
I hope that my "Frenchglish” is not too
QLy Yours,
Je
Jean-Claude Touzin.
5 REPeat index
20 INPUT "Number of index’ titles?
30 DIM aS$(a,28),bS (a, 12)
100 FOR n=1 TO a
110 INPUT\ "Enter index’ title no" &@na&”
120 IF aS(n)="x": a=n-1: EXIT n
130 INPUT"Enter pages "; b(n)
140 END FOR n
500 INPUT “Enter first tab ";tb
510 OPEN#4,ser1: BAUD 9600
520 FOR n=1 TO a
530 PRINT#4;TO tb;as(n);TO (tb+26); bS<n>?
540 END FOR n
550 INPUT’Number of linefeed "jx
560 IF x>0: FOR n=1 TO x: PRINT#4;\
570 CLOSE#4
680 END REPeat index
Do
APRIL 1989
line.
whea you want to repeat something in Superbasic,
c of SER1,
As is,
from QUILL.
need to repeat the
define. Also notice
Superbasic: you can
prompt, plain text,
even loop control
which make
I do not
the
a REPeat END REPeat
instead of GOTO. That's what 1 have done to your small
hard to decipher...
bE ts C
nutes 99 YPBATE ~ Same flag hime Out This ts Badin
Ge LCL s
(x to end):"\a$ (n>
j.
FReeble
Heed a. QL Powder Suphy
mpDdule 7 . :
since hed Ag a oatside fish al
-5: d
nstailed, “ad Ldont pores
niusTache Te Tkim — Yau €
fave My cll Ol pus saphly
Fee hippie Col of A
PEi00, FIRS CAM ete aa
—04/ MP0487TE ~ bJ
Coes! dup, Kaaning % Mas
a Oo)
Tache Mim me)
TOR even
UPDATE MAGAZINE
UPDATE MAGAZINE & APRIL 1989
=
The FD-68 Update
_ by. See Np coch —
Last issue, we learned little bit about CP/M. We now have
the important system addresses and the function calls that are
common to most all CP/M systems. We will explore the use of
these items in subsequent issues so, keep this information close
at hand.
Also, I mentioned CP/M public domain software last issue.
The public domain software is generally very good. There are
application programs for any use you can imagine and generally
the source is included, as well as documentation! There are
also utilities, games, languages and virtually anything you can
imagine. The best source is the original CP/M user group,
SIG/M. SIG/M have over 3@@ CP/M disks full of public domain
software. You will not find any ’Shareware’ on these disks,
everything is truly public domain, SIG/M can be contacted at:
SIG/M-Amateur Computer Group of New Jersey, Inc.
P. O. Box 97
Iselin, N. J. ©8839
On a more local basis, there are still many active CP/M
user groups, most of which have the SIG/M library available.
Contrary to the PC Cloner’s opinion, CP/M is not dead. CP/M has
matured so there is not much new being developed but many of the
old programs are constantly being improved. Also, there are ~
many bulletin boards that cater to CP/M by having the latest
revision of the more popular programs available for download.
Many of these boards are free but the small access fees charged
by the others are cheap, compared to the price of good software.
The following list is just a few of the programs I find
indispensable and which I strongly recommend you obtain. It is
certainly not exhaustive, but are a few that I use almost daily.
sD COM Super Directory is much improved over the
CP/M internal command DIR. SD.COM allows
complete control over the output of the
disk directory information.
DU -COM Disk Utility allows editing of individual
disk sectors. The control DU gives you
is similar but much greater than SEKTOR
which, is written for the FD-68, Timex mode,
by Mowgli Assor.
NSWP -COM New Sweep is a user friendly replacement for
CP/M’s PIP.COM and does much more. NSWP
contains abilities that would otherwise
require several utilities. I consider NSWP
to be indispensable.
28E COM Z8E is an interactive debugger/disassembler
that will run circles around CP/M’s DDT.COM.
If you are an assembly language programmer,
this is a must have.
21
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
UNERASE .COM UNERASE will recover erased files. Great
for accidental erasures.
MODEM7 .COM There are many updates to this original
version but, it remains the best generic
communications program, particularly the
updated version MEX.COM.
NULU .COM New Library Utility is needed as your number
of files grows and you need to conserve disk
space. It combines several files into one
which recovers the excess space that your
system requires for its smallest disk file.
For Example, a normal DSDD drive will have a
minimum file size of 2048 bytes (2K). This
is true even if the file is only one byte.
NULU reduces the minimum file size to CP/M’s
128 byte record size
I should explain filenames for those of you that unfamiliar
with CP/M file naming conventions. All programs, text, data,
etc. are called a file. Each file name has two parts, the
individual filename which is 1-8 characters and an optional file
extension of 1-3 characters. A generic file name is often used
which is "filename.ext".
Like the Timex mode of the FD-68, the CP/M file extensions
have definite meanings however, CP/M does not require a file 7
extension. The recognized meanings are listed below. Again,
this is not an exhaustive list but they are the most often used
file extensions.
T 1
COM COMmand files are your programs. This file
type is automatically loaded into the TPA
and executed by typing its filename, without
the extension, at the CP/M prompt.
BAS These are BASic program files. They cannot
be directly executed. You must first load
MBASIC.COM in order to be ’in Basic.’ The
MBASIC interpreter will load and execute the
Basic program. Note: This is not the very
user friendly Sinclair Basic that you have
become accustomed to but, is the MicroSoft
Basic-80 interpreter.
SUB These files are Ascii text files which con-
tain several CP/M commands. Use SUBMIT.COM
to execute these files.
DOC DOCumention files are rather obviously the
instructional files for the .COM file of
the same filename. This extension is also
used by several wordprocessors to designate
the working DOCument.
TXT TeXT files are simply Ascii text files of
any nature.
ASC ASCii is an alternate for TXT or DOC.
22
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE
APRIL 1989
BAK BAcKup files are copies of other files of
the same filename. Most wordprocessors use
these files to retain the integrity of the
original DOCument file.
HLP HeLP files are special Ascii text files that
are used by HELP.COM to provide help for
many programs and CP/M instructions.
ASM ASseMbly files are Ascii text source files.
These files must be assembled by ASM.COM to
produce executable .COM files.
c These are extensions which are Ascii text
FOR source files that are used by that
PAS language’s compiler.
REL RELocatable object code files are output by
the MicroSoft assembler.
DAT DATa files are in various formats and they
contain.
LBR LiBRary files are collections of files that
usually related and written to the disk in a
compressed format. See NULU.COM explanation
above.
HEX HEX files are Ascii files that are in the
Intel Hex format which is very similar to a
standard hex
dump.
You will find file extensions that have a letter 'Q’ for
the second letter.
unsqueeze these files prior to use.
use an extension that is unique to then.
These are ’squeezed’
files and you must
Lastly, many applications
For example, .CAL is
used by the SUPERCALC spreadsheet (not public domain).
Let’s stop there until next
issue. Next time I’1l give a
couple routines to move files between Timex mode and CP/M, as a
means to demonstrate the use of a CP/M function call.
Syd Wyncoop
15951 Rosalita Drive
LaMirada, Ca 99638
The Printer Revolution
Just as the year 1989 gets into full swing
the printer industry is going through an
evolution. The 24 pin dot matrix printers
are driving the 7 and 9 pin printers from the
market. Some dealers may get hurt if there
are stocks of 7 and 9 pin printers on hand.
These older printers that sold from $300
to 900 just last year are now being dumped
for as low as $150, a good buy for those
willing to settle for "NLQ".
The 24 pin printers started before
Christmas at high prices, but as we enter
March, we see the Epson LQ-500 offered at
t
$299-c0* 2 $200 drop in price in just three
months. The Seikosha SP-1000 that T bought
two years ago for $325.00 can now be found
for $150.
The prices of Daisy Wheel printers could
be affected also. Until now, the difference
in print quality between Dot Matrix NEAR
Letter Quality, and the output of a Daisy
Wheel printer was as night and day. The
Daisy should still maintain an edge because
of the "bleeding" characteristics of dot
matrix print. Ink bleed is caused by the
tiny wires of the dot matrix printer actually
puncturing the paper. This shows up markedly
in copies made of the two products.
23
APRIL 1989
UPDATE MAGAZINE
DAT!, MAGAZINE
APRIL 1989
Style Sheets, Formats and Macros
by Peter Hale
The other day 1 demonstrated TASEMASTER ta
my QL user group. As bug eyed as all were
aver TASKMASTEBR, the hit of the show was my
use of style sheets in Quill and Abacus.
There's a lot about Formats, Style Sheets,
and, most commonly, Macros in the computer
press. What few at the meeting realized is
that the QL has them all, although you need
Toolkit If ar Keydefine to make macros,
STYLE SHERTS are most common in word
processing. I dielike Quill's default page
design, particularly the footer which is
inappropriate in correspondence.
I create a document of my letterhead with
design, margins, footer, justification and
tabs the way I like them. I have both my box
number and my street address, together with
adummy date and salutation. 1 include a
reminder af the control cades | use tn Quill
ta make the printer do double-wide and elite
type faces. 1 save that as flpl_setup_doc.
Now when I power up in Quill, I load
flpi_setup, position the cursor to delete
whichever lines of my return address 1 am
not going to use, ga into OVERVRITB mode ta
enter the correct date and salutation, and I
am off and running, knowing that the letter
will have my desired design and format.
Among my dozen or so style sheets I have one
sheet with the correspondence parameters
called close _ doc. This has my ‘Sincerely
yours,’ ete. 1 position the cursor at the
bottom and merge clase_doc,
FORMATS are commonly mentioned in the
context of spreadsheets and databases but
are really nothing more than style sheete.
as far as Abacus is concerned, it need be
nathing more than a template that you have
saved as flpl_setup_aba, with the design
features, grid, numarical and text justifi-
cation, and units you prefer on startup. You
may have setupl, setup2, etc. for different
applications or colum headings.
archive isn't so ammenable, unless you have
a sulte of procedures that you commonly use
in your programs, such a might permit single
key movement around a database or search for
records to delete.
APRIL 1989
HACROS,
the context af spreadsheets
The definition of a Macro tends to depend on
too, are most commonly mentioned in
and databases.
whom you ask: it seems to refer to style
sheets and formats that can be loaded with
only one or two key strokes.
With Toolkit 11 or KeyDefine operating in
your QL you can dedicate certain key
combinations ta perform a. desired sequence
of instructions.
With Toolkit 11 have a line in- the boot:
ALTEEY “s", chr$(240)&"sflpi_setup"achrs (10).
While in Abacus; press ‘ALT::+ 5. The
template setup will be automatically loaded
from flpi_.
Within Quill the same ALT + Ss will load
flpi_setup_dac.
If you commonly work without the prompt
window, avoid the need to press F2 on
startup by including chr$(236)&% just prior
to chr$(240? in the ALTKEY example above.
Similarly, having the line: ALTKEY "g",
chr$ (240) &"gw7","b","f"achr$(10) in the baoct
will let ALT + g set the grid width to 7 in
calums B through F in Abacus.
With KeyDefine a similar series af ALTKEY
functions can be created.
KeyDefine lets you create chains af commands
(formats) that will sequentially set para~
meters, That is, you can set a given ALTKBY
combination to invoke a series of KeyDefined
functions. (Hat possible with Toolkit 11.)
Only your tmagination limits the passible
applications but note a few realities.
Long ALTKEY and KeyDefine strings proceed
only as fast as the characters can be sent
to the screen. There is a point at which it
is quicker to load a file from medium.
Any QL character, no matter haw awkward the
key combination, can be set to an ALTKBY
under Toolkit Il, Thus ALT A and ALT a can
have separate functions attached to them,
If operating under a multi-tasking front end
such as TASEMASTER that alsa uses ALT
functions, be sure to restrict dedicated
ALTKEY's to characters that are not used,
24
UPDATE MAGAZINE
UPDATE MAGAZINE
APRIL 1989
QLAND_LORD
A Review By Roy Arsenault
VERSION REVIEWED: V. 1.0
REQUIREMENTS: 256K RAM and Archive V. 2.® or later
SOFTWARE PUBLISHER: EMSOFT DIV., ESTATE MANAGEMENT SERVICES,
P.O. Box 8763, Boston, MA 2114-8763, (617) 889-0830
OVERALL PERFORMANCE: Excellent
DOCUMENTATION: Very good
ERROR HANDLING: Very good
EASE OF USE: Excellent
SUPPORT: Very good (phone support QAM-6PM Eastern)
PRICE: $19.95 5 1/4 Disk or $21.95 Micro Cartridge
I obtained a copy of QLAND_LORD because of my interest in
Financial and Data Base software. 'QLAND_LORD as the name
implies is designed to aid in the management of real estate.
It provides complete detailed record keeping for all
financial transactions, prints rent receipts» provides
quarterly reporting and prepares the data required for IRS
Schedule E tax reporting. A future release will provide for
check printing.
The software is easy to use and menu driven. I had to refer
to the manual only once during my initial usage. Some other
features are:
* Manages up to 99 units in a single file.
* Records can be ordered by unit, date, or type of
transaction.
* Security and key deposits are maintained seperately from
cash flow.
* Procedures for opening and closing the books for varying
reporting periods are supported.
*.The program code is unprotected for easy editing and
enhancing.
QLAND_LORD represents an excellent value and is. at least two
cuts above the boring blue world.
~~ See EMSOFT Ad, page 48 this issue.
25
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE f
Low Cost Voice Recognition
For the TS-2068
By: John McMichael
With a new chip recently offered for sale through
Radio Shack distributors and a few other parts, a
speaker-independent word recognition circuit can be
easily and inexpensively built. This article will
describe how to build the circuit and interface it
to a 152068 via a joystick port.
The new VCP200 chip has two speech recognition
odes: Command Hode and Yes-No/On-Of4 Mode. In the
Command Mode, the chip can recognize five sotion
related commands: GO, STOP, LEFT TURN, RIGHT TURN,
and REVERSE. In the Yes-No/On-Off Mode, it
recognizes two sets of commands: either YES and NO
or ON and Off. When a command is recognized, the
associated output for that command is latched at a
logic low. In addition to the two outputs for the
yes-no/on~off mode, there is also a “command not
recognized” output. The VCP200 chip comes with Radio
Shack’s own technical data sheet, application info.,
theory of operation, and a diagram for a circuit in
which one of five LED’s will light in response to a
spoken command. I modified Radio Shack’s circuit by
replacing the LED’s with optoisolators. The output
sides of the optoisolators are wired to a standard
9-pin female joystick plug for sating with either of
the T8204B’s two joystick ports. By using the BASIC
STICK" command, the status of the VCP200’s command
output latches can be read and used as spoken input
to a program. Asong other applications, the circuit
can be used as a voice controlled joystick. While
limited to recognizing just a few fixed words, the
beauty of this circuit is that NONE of the TS2068’s
RAN is required. To use it is as siaple as plugging
it in and turning it on.
BUILDING THE CIRCUIT
The circuit can be built on a general purpose
pre-punched .100* X .100" grid board by soldering
wires from point to point, or by etching a single
sided copper-clad board using the layout pattern
shown in the solder side diagram, In either case,
the ainisue size board you'll need is 3 3/4" 1 2",
The circuit is designed to operate at 5 volts DC and
draws about 50 aa. If you don’t have a 5 volt DC
power supply, you can use a 9 volt DC supply (such
as a T$1000 or 2050 aodes uses) and a LM7805 voltage
regulator IC (U3). If you are cosfortable with the
reliability of battery power, a9 volt battery may
be used. If you have a regulated 5 volt DC supply,
you can omit the LH7805 regulator and solder @ wire
APRIL 1989
APRIL 1989
juaper from U3’s *IN* pad to U3’s “OUT" pad and make
the 5 volt supply connections to the pads labeled
"9V. DE*. The circuit can be turned on and off
independently of the 182068. A SPST toggle or slide
switch can be soldered to the pads labeled "PWR
SWITCH". If you do not want a power switch, install
a wire jumper between the “PWR SWITCH” pads. I
soldered a cannibalized joystick plug wires to the
p.c. board as shown in the hook-up diagram.
The following table shows how the vocalized commands
for each acde correspond to a joystick’s directions
and fire buttan:
VOCALIZED COMMAND
NODE 1 MODE 2 JOYSTICK DIR. /FIRE BUTTON
“LEFT TURN".
"STOP". see FIRE BUTTON
As some prograns require the “fire” button to be
activated while a cursor is being aoved, a normally
open pushbutton can be wired parallel with the
optoisolator’s output associated with the "STOP"
coreand. The optoisolator [C (US) can be elisinated
for manual pushbutton “fire” only. Wire this
pushbutton to the pads aarked "FIRE SWITCH".
You may also find that a second normally open
pushbutton for resetting the VCP200 to be very
useful, Because a recognized spoken comsand results
in a latched output, problems can arise when the
voice actuated joystick is used with certain
programs. For example, when used with TECH-DRAW JR,
the command "TURN RIGHT" will cause the cursor to
ove right across the screen. Vocalizing a coamand
not recognized by the YCP200 such as “SIT” will stop
the cursor, but even speaking the words a fast as
possible, in the time it takes to say "TURN RIGHT®
and “SIT* the cursor can traverse a large part of
the screen. By using a pushbutton to reset the
VCP200, the "unlatching" of a spoken cormand can be
done as fast as you like. Wire this pushbutton to
the pads labeled "RESET SWITCH" on the p.c. board.
Selection between the two speech recognition sodes.
is done with juaper (J1). The five aotion commands
are selected with (J1) installed and the second
yes-no/on-off sade is selected with (J1) resoved. A
SPST toggle or slide switch can be wired in place of
(Jt) for facilitating aode switching.
2.6
UPDATE MAGAZINE
UPDATE MAGAZINE ES eed =) APRIL 1989
Parts List;
ct = .22 ut your letter to: John McMichael, {710 Palser Or.,
C2 = 47 pf Laramie, WY 82070. I would also like to thank M.D.H.
€3,C4,C12 = 01 uf Enterprises for developing the super p.ceb. designer
5 24.7 pf Program “PC-DRAW* which was used to draw the circuit
Cb,C7,CIL = of uf diagrams for this article.
cB 210 to 22 uf tantalua
C¥,Ci0 == 27 pf
R2,R5 eik
R3,R6,RI3 = 10 K
RA = 470K
R7 = 470 k to 750K
RB =10 Meg i
wee 1 REN sesteteatt
RIL 247k ssasasaagaegs
Ri2 2100K : 2 REM $ VCP200 TEST PROGRAM 1
RIT 2470 S REM MeRSteReeReegeg eee
4 REM $t by John McMichael #8
10 CLS : PRINT AT 0,2; INVERSE 1;*VCP200 WORD RECO
GNITION TEST": INPUT "Using recognition pode 1,27 °;
ag: IF a$("1° AND a$()*2" THEN GO TO 10
20 LET rp=7: PRINT AT 5,5; INVERSE 1;*HODE 1";AT 5
922; "MODE 2"; INVERSE O;AT 7,13;*not recognized";AT 8
s1p"STOP*ZAT 9,15 "60" SAT 10,1; "REVERSE" SAT 11, 15 "LEF
T TURN*SAT £2, t3"TURN RIGHT*;AT 5,22;AT 9,18;"NO or
ON*AT 10,18; "not recognized*;AT 12,18;"YES or OFF*
= LN324 quad op-aep IC (R.S. cat.# 276-1711)
= VCP200 word recog. IC (R.S. cat.# 276-1308)
$US = LN7B05 S-volt reg. IC (R.5. cat.# 276-1770)
2 quad optoisolator (D.K, part # PS2501-4NEC)
= single optoisolator (D.K. part # PS2501-1NEC)
Yl = 10 MHz crystal (DK. part # X057)
WIC.= Electret sike element (R.S. cat.# 270-092),
SSWITCHES = 2-n.o. pushbutton; 2~-SPST toggle/slide
PLUG = Replacement ATARI joystick plug w/wires 30 LET $= STICK (1,1)
NISC.: 2-20 pin and 1-14 pin IC sockets i
4 = Optional depending on configuration - see text =, ah tora toa en ae THEN LET ra7¢(3 AND a8
30 IF s=0 THEN LET 10 SUB 100: 60 TO 30
60 LET r=8+s~(s=4)-(4 AND s=8): GO SUB 100; 60 TO
Parts Suppliers
R. RADIO SHACK 30
DK. * DIGI-KEY CORP., 701 Brooks Ave. South, P.D. 100 PRINT AT r9,08(47 AND af="2")" “SAT r,04(17 A
Box 677, Thief River Falls, MN 56701-0677 D a$e*Z"); INVERSE 1;*)% LET rpers RETURN
YESTING THE CIRCUIT =,
The VCP200 voice recognition test program will allow
you to test your circuit by indicating on the screen
which word is spoken for either of the two voice
recognition aodes, Accurate and consistent
pronunciation of coamand words is very critical. The
YCP200 test program will give you a visual
confirmation that your pronunciation is correct. The
data sheet that comes with the YCP200 chip has aany
helpful suggestions for optimizing voice recognition
reliability - be sure to read it! ED NOTE: John says that if as many as
15 folks want a READY to USE circuit
board that he will make one available.
Letters to: John McMichael, 1710
Palmer Drive, Laramie, WY 82070.
While the VCP200 voice recognition circuit can be
used as a substitute for a joystick with some
programs, it does not have the response speed and
accuracy required by some joystick oriented
software. I’ certain that some interesting prograes
can be adapted to or written specifically for voice
input. I would very much like to hear from anyone
who experiments with the ¥CP200 circuit. Address
27
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
HOOK-UP AZAGRAM
VOLT _
SUPPLY
PCc-pRAW 5.0 1271e/6ee
mo DOM Enterprises PC DRAW =-0 12718788
ComPoNeNT
2
© 2.9 B.
eo 8 Son Eee £
o- oO + oO % “~"
O22, O50 oS 8 2 fee.
sites. of 29 8 20°37). oo...
¢ 8-8 vs 9 (Pree
ond si 38% o8 g 3 81 Our re
ut
ono® > nrc 4 ose $ $ $ 3 rev
cr.) oe oy 8" 80m a
3 (Yr) so
en 8 Soe.
2.8
APRIL 1989 UPDATE MAGAZINE
UPDAIE MAGAZINE
APRIL 1989
The CABLE COLUMN
woop AND wIND COMPUTING
Bill Cable : RR 2 Dox 92 Cornish, HH 03745 : 603 675 2216
PROGRAMMING 10 ARCHIVE
In the last 2 issues of UPDATE you were introduced to ARCILIVE, the excellent
database program supplied with every QL. You were encouraged to try it if you
haven't already because almost every computer user has applications that
tnvolve the storage and retrieval of information. When you load ARCHIVE, your
QL becomes a powerful information handling machine. The IBM version of ARCHIVB
TeCeFOUR for $99) is Just like our QL ARCHIVE. In fact these articles can be
used as tutors for IBM clone users who have it and these programs will work on
their IBM machines. So ARCHIVE can be used on millions of machines.
you will find that although ARCHIVE 1s very powerful it is not convenient to
use unless you put the tasks you want to accomplish in program, vo you can
quickly call them up and axecute them. What a drag you, say, Well you can
purchase quality ARCHIVE based programs for specific applications that don’t
Fequire Knowledge of ARCHIVE programming. But have you tried the language? It
ig 'a very nice longuage and its implementation on the QL is very efficient and
seit bendved. The ARCHIVE language is a procedure oriented language like
SUPERBASIG but without line numbers. When you write a program in ARCHIVE you
make a series of procedures. These are blocks of code with 8 name. When you
more the task done that the procedure provides you simply use Its name. That
part of the program will be executed and you will return to where you were.
flow can you keep track of your program without line numbers you ask? ARCHIVE
hee a nice built-in program editor (think of it like a word processor for
writing programs) just for that purpose. It does it all for you automatically.
When you enter the program edit mode any loaded procedures are listed alpha-
betically on the left side of the screen. The procedure being edited is in
peri face and its lines appear on the right. You change which procedure to
edit by pressing <TAB> or <SHIFT><TAB>. You choose your edit location within
the procedure’s lines (on the right) by the up arrow and down arrow keys. You
do your editing at the bottom of the sceen. It very convenient and much easier
than SUBPERBASIC program editing. The editor automatically indents conditional
vietements and loops for easy reading. Because the language has very good
error mecsages, giving procedure name and the line where the error occurs and
‘the editor 1s so quick at hand you can debug very fast.
So let's try entering a small program called ‘e' which allows us examine a
database with single key presses. You can try it on the gazet database
provided with ARCHIVE. You can easily customize it for your own purposes.
Plies exerciee will introduce you to ARCHIVE programming. We won't worry about
how the program works but rather the more basic skill of how you enter and
edit a program. Have the ARCHIVE section of your user's manual open. You can
look up the commands and functions there for more detail. At the end of the
article is a list of the the commands you should be familiar with for program
editing in ARCHIVE. Keep it handy as a quick reference.
BSTBRING AN ARCHIVE PROGRAN
Below I will go through all the keystrokes necessary to enter a short but
useful program that consists of 2 procedures. One procedure is called 'e' for
examine and the other ‘sfind' for string find. What you should type in will be
in bold and my comments with be in (},<ENTER> means press the ENTER key. Most
of the editing takes place at the bottom of the screen: lf you make a
detectable typo the editor will reject your line and force you to redo it.
Otherwise correct mistakes after you enter the procedures.
Start up ARCHIVE by resetting and putting the DATABASE (ARCHIVE) cartridge in
dvi. and pressing <Fl>. ARCHIVE loads and we are in command mode, Put a
formatted cartridge in mdv2_ to save the finished program to, We will activate
the program editor, enter our 2 precedures, save the program, and run it.
Vatch the top screen boxes as they tell you what to do also.
29
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
edit<ENTER> (activate the program editor?)
The editor activates. No procedures are loaded and the editor prompts for the
name of our procedure. Type in its name and then the lines of the procedure.
e<ENTER> (name of this procedure}
cls<BXTER> {lines of the 'e' procedure)
input at 2,1;"Look at which database [device_name] : *; ans$<ENTER>
look ans$<EBTER>
mode 0<ENTER>
display<BNTER>
let c$=""<BNTER>
while c$<>"e" <ENTER>
sprint<ENTBR>
print at 14,58;"KEY OPTIONS recnum();" "; at 15,60;"b back”; <ENTER>
print at 16,60;"n next"; at 17,60;"£ first"; at 16,60;"1 last" (ENTER?
print at 19,60 string find"; at 20,60;"c continue” (BNTER>
print at 21,60;"e exit";at 23,58;"%* press a key **"<ENTER>
let cS=getkey ()<ENTER>
let c$=lower (c$)<ENTER>
print at 23,50;rept(" ",30)<ENTER>
if back endif<ENTER>
AL next endif<ENTER>
if endif <EHTER>
if endif<EHTER>
2S. efind:, endif<ENTER>
Af continue : endif<EHTER>
endwhi le<ENTER?
close<BSTER?
mode 1<ENTER>
We are done with our first procedure. To end it press :
<ESC> {end entering first procedure}
Ye will now make one more procedure. To create a new procedure type :
<F3>n {edit command for new procedure)
sfind¢ENTER> {new procedure name)
print at 23,50; rept (" ",30)<BNTER> {lines of the sfind procedure?
input at 23,50;"Find what : "; 1%<EHTER>
1£ i80>"": find 1$: endif<BRTER?
print at 23,50;rept(” ",30)<ENTER>
df not found(): print at 23,60;"Hot found”: endif<BNTER?
We are done entering the 2nd procedure so let's exit from inserting
<ESC> fexit from inserting lines)
Now let's exit from the program editor and save our program and print it out.
<ESC> {exit from the program editor to ARCHIVE command mode?
save "mdv2_eprag"<EHTER> factually saved as mdv2_eprog_prg)
1list<ENTER> ido only if you have a printer and put if online?
Now let’s run it.
eCEHTER> {activate the e procedure}
mdvi_gazet<ENTER> {our program prompts for a database, let's use gazet)
30
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
Now play with the menu options. If everything works well you have done good.
lf you get an arror, note where it occured and the error message and type :
clase<BNTER> {close database if left open by the error)
mode 1<ENTER> {mode 1 has upper display box visable)
Check you printout against the instructions above for typos. When you
determine the problem use the editor to correct it and rerun it. Program
structure fault means if-endif or while-endwhile don't pair up. Below are the
basic commands needed. Don't forget to save your corrected version.
ARCHIVE PROGRAM EDITING COMMANDS
i. When in ARCHIVE Command mode (not in the ARCHIVE program editor)
Start the editor edit<ENTER> {from within ARCHIVE)
Load a program load " (}"<EBTER> {where {}=device_name,ie. mdv2_prog)
Save a program save "()"<ENTER> {where ()=device_name,ie. mdv2_prog)
Start a procedure {) <EBTER> {where ()=procedure name)
print a program 1list<EBTER> {list out loaded procedures)
2. When in the ARCHIVE program editor (not in ARCHIVE command mode)
Stop the editor |‘ <ESC> or <ESC><ESC> {returns to ARCHIVE command mode)
Make a new procedure <F3>n<ENTER> {new procedure command}
: {) BNTER> (where ()=name for procedure)
{enter lines of procedure)
<ESC> {when done)
Move to a procedure <TAB> or <SHIFT><TAB> {until its name is in bold)
Move to a line <up arrow> or <down arrow? (until it is in bold)
Insert new lines {move to line just above where they go}
<F4> {insert command)
{now insert lines)
<BSC> {when done?
Edit a line {move to the line to be edited with arrow keys)
<F5> {now edit line at bottom of screen, use arrows)
<ENTER> (when line is okay?
Cut (Delete) line(s) {position on 1st line to be deleted with arrow keys)
<F3> c {cut command?
{use up or down arrow to mark those to be deleted)
<ENTER> {delete marked lines or <ESC> to abort)
Paste (copy) Lines {Cut them as above)
{move to procedure & line to put them)
<F3> p <ENTBR> {they will be pasted in place}
Delete a procedure (Move to procedure to delete by <TAB> & <SHIFT><TAB>)
<F3> d <ENTER> {its gone}
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
Customized Catalog Command for LkKdos by Larry Kenny
This is an alternative Catalog command that can be added to
your programs or to use when mo ifying an existing program for
disk. It only peiots the selected n
without any other info such as disk name of disk parameters. It
works very well with windows such as_the ones in LKdos or in a
program like Art Studio that uses pulldown menus.
This machine code routine is relocatable and is 120 bytes long.
You can use an assembler to enter the assembly language source
code on the next page or just enter the decimal values into
memory at almost any address (40000 is ok) then save the code.
It will also fit into the printer buffer _at address 23300. The
syntax for the command is the same as the Cat command in the dos
and it supports selected searches and wild card character a)
the same as the dos on eprom. When using the new command, the
USR call is to the address where you loaded the code.
EG: RAND USR 40000: CAT “", (or CAT".C", etc)
Further Customizing -_ You can change the first command from
LD A,2 to any channel number eg: LD A,3 will send it to
printer or LD 5S can be used for ia window attached to chanel 5S
Also you can modify the width of the cat listing by changing the
return added on line 770 of the assembly listing to printing a
few spaces instead which will let you print up to 3 file names
per line. If you want tg run entirely from machine code then
remove the lines 210 to 260 and transfer your search string
directly to prognm terminated by a ‘"'.
The Basic program below is a demo to show the Cat command being
used with Windows. If you are using a version 2 eprom be sure to
load a narrow character set for the windows.
5 REM -- WINDOW CATALOG DEMO ~-
10 RANDOMIZE USR 100: OPEN #4, "dd"
20 PRINT #4: CLOSE #2
25 CLS : PRINT INVERSE 1;"BASIC FILES", "CODE FILES”
ZO IF INKEYS="b" THEN GO TO 100
40 IF INKEY$="c" THEN GO TO 200
50 GO TO 30
100 PRINT #4: OPEN #2,"wo"
120 PRINT #4: INPUT #0,1,0,20,20
130 RANDOMIZE USR 40000: CAT "-B",
150 PAUSE 0: GO TO 20
OPEN #2,"wo"
INPUT #0,1,16,30,20
240 RANDOMIZE USR 40000: CAT ".C",
250 PAUSE 0: GO TO 20
Decimal Dump of Custom Catalog
62 2 205 48 1g 243 205 98 oO 175
50 29 32 205 126 9 205 123 0 231
205 156 0 235 121 254 0 32 3 33
34 32 54 34 205 141 90 33 136 32
35 126 254 250 202 186 0 254 255 32
245 35 126 254 254 40 239 34 176 92
6 q 17 34 32 26 254 34 40 31
254 94 40 8 190 40 8 35 16 241
24 214 19 24 236 26 254 94 40 7
254 34 40 7 190 32 199 19 35 24
240 42 176 92 6 9 12 35 229 197
215 193 22 16 247 62 is 215 24 176
APRIL 1989 UPDATE MAGAZINE
UPDATE. MAGAZINE APRIL 1989
Customized Catal by Larry Kenny
o0010 ORG 40000
00020 wrkspc EGU 8220
00040 data EQU wrkspc +108
00050 curtrk EQU wrkspc +1
@ anywhere
Work area in cartridge
Address of data block in Lkdos
Holds the current block number
Q0060 P53 nm EQU wrkspe +6 Buffer in Lkdos for String
QADBF EQU 1235 - Dos call to load disk to buffer
g00BO TRACK EQU 126 ~- Move drive head to (curtrk)
- Move CHAD to end of Basic line
- Get file name or string from command
0119 JPOUT EGU 186 ~ Exit the cartridge
00130 CAT LD A,2 - Open channel 2 (or any channel)
00140 CALL #1230
00150 I
90160 CALL 98 -— Turn on cartridge
00170 XOR A
90180 LD (curtrk) ,A
00190 CALL TRACK ~- Move head to Track O side 0
00200 CALL_LOADBF - Load disk Catalog to buffer
902190 RST 32
00220 CALL GTFIL - Evaluate Strings in Cat command
00230 EX DE,HL - and place result at prognm
00240 LD a,c
00259 cP oO - If length of string = QO then
00260 JR NZ,QUOTE
Q0279 LD HL,prognm — put end quote right at start
00280 QUOTE LD (HL) ,3: - of the string butfer
Q02z99 Cale. ENSLN -~— move Basic pointer to next command
00300 LD HL,data - set HL to start of Catalog
00310 FNDNAM INC HL — Look for start of next name cell
90320 LD A, (HL)
GOSSO ce 230 - If 250 then end of Catalog
00340 JP Z,JPOUT - and exit cartridge
90350 CP 255 ~ 255 means the start of a name cell
00360 + -JR_NZ,FNDNAM
00379 INC HL
00380 LD A, (HL)
0390 CP 254 - 254 means Cell not used or deleted
00400 JR Z,FNDNAM
g0410 LD (23728),HL - Store the. start adress of the Cell
00420 LD B - Lenght of file name
00430 __ fa) DE sprognm - Point to search string#
00440 First DA - Find first char of search string
00450 cp 34 - end of search string ?
00469 UR Z,Print - If so then print it.
00470 Cc - Is Wild card first character ?
90480 JR Z,Wildi
00490 cP IL)
90500 RK Z,Match — Start of searh string found ?
GO510 I
00520 DINZ First
00530 JR_FNDNAM
00540 Wildl INC _DE ~ Move past the wild card character
00550 JR First
0560 Match LD A, (DE) — Check if entire string matches
00570 ce 9
00580 JR Z,Wildc - If Wild card then dont check it
00600 ce 34
00610 JR Z,Print ;
90620 CP (HL) - If string doesnt match then
00630 dR_NZ,FNDNAM —- go and find next name cell
00640 Wilde INC DE
00650 INC HL
g0660 JR Match — Check next character
00670 Print LD HL,(23728) - Print the file name
00680 LD B,? — print 9 characters
00690 Pnext LD_A, (HL)
Q0700 INC HL
00710 PUSH HL
0720 PUSH BC
gQ730 RST 16 - send to current channel
00740 POP BC
00750 POP _HL
00760 DJNZ Phext
00779 LD A,1IS - Print carridge return
00780 RST_16
90790 JR FNDNAM
33
APRTL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE
LARKEN DIRECTORY (Track 0) REPAIR
by G. Chambers
The track directory for the Larken disk system is
located on track 0. This directory stores the data
that is required by the system to locate and load the
chosen file. On occasion the system, for obscure
reasons, 1s prone to corrupting the directory tracks
thus effectively causing the loss of all programs on
the disk. This problem is more apparent on the first
vintage of the system, nevertheless {it could occur on
any system. This program is designed to restore the
track directory to its pristine newness!!
The program 1s able to do this because of the
design of the LARKEN systen whereby the program name
(also it's starting address, and length) fs stored at
the beginning of each track.
The program commences by working it's way through
the disk, track by track, picking the program name off
each track, It stores this information in a string
array, then using thts information it reconstructs a
new directory in memory and saves it to track 0.
Although the program does a very effective job
there are a couple of points to be aware of. The
program will restore to the directory track a record
of every program file that tt finds on the disk. This
includes any programs which may have been erased in
the original state. Now, this in itself does not
present a problem, A problem can arise however, If the
erased program fs not complete. {.¢. some of it's
tracks have been reused with by a subsequent SAVE. In
this case a program will be shown as recovered, but in
fact {it has been only partially recovered, The
solution 1s to do a manual erase of any such programs,
The program listing here is for LARKEN systems
which hold 5090 bytes/track. This is the system which
1s currently being marketed by Larken Electronics. I
have provided a list of the program lines which need
to be changed to make the program suitable for the
earlier LARKEN systems which hold 1960 bytes/track.
190 REM Disk Directory
Repair for the LARKEN system
149 REM By G. Chambers
Scarbo
CANADA M1K 2Y4
44 Richome Court
rough, Ont.
120 REM Use to reconstruct a dama
ged Oirectory(Track 4)
130 REM Data statements contain
the'RHMOOS.C2" Code.
136 REM For use with the OSK4gG syst
em of 5090 bytes/track
i.e.69 tracks
149 GO TO 160
using 00 drives
APRIL 1989
34
APRIL 1989
459 RANDOMIZE USR 100:
INE 150
46 RESTORE 219
170 FOR n=63909 TO 63194
189 READ a: POKE n,a
190 NEXT A
210 DATA 195,43, 246, 195, 72,246,195, 104,24
6,243,205, 98,0,201,58
220 DATA 100,0,251,201,205,33,246,58, 176,
92,50,29,32,205, 126
230 DATA G,205,123,0,33,112,32,17, 156,224
3 1,8,20,237,176
249 DATA 195,38, 246,205,33,246,58, 175,92,
50,29, 32,33,156,224
250 DATA 17,112,32,1,0,20,237,176,205,150
9,205, 126,0,205
260 DATA 120,60, 195,38, 246,205,33,246, 205,
429,0,205,123,0,33
270 DATA 112,32, 17,156,224, 1,0,20,237,176
1195, 38,246,201,0
299 DIM a$(79,3): OIM c&(79,9): DIM bs(9)
2 DIM d$(256)
300 LET trac=2372!
LET loadbuf=63000: LET savebuf=G3003
349 LET O=79: LET e=4: LET Fa4: LET burfe
#57500: LET name=57688: LET trackno=5769
8
312 BOROER 1: PAPER 1: CLS
320 PRINT AT 2,7; INK 2; PAPER 5;"LARKEN
OISK UTILITY"; PAPER 1;,,TAD 2; PAPER 6
Directory (Track 8) Recovery"; PAPER 1,,T
AG 7; PAPER 6;"By George Chambers"
325 INK 3: PLOT 9,108: DRAW G,G2: ORAU 25
5,0: DRAW 0,-G2: URAW -255,0
326 INK 6: PLOT 8,114: DRAW 0,50: ORAW 23
8,0: DRAW G,-5: DRAW -~238,0: INK 7
SAVE "repair.G1" L
LET nexttrack=63006:
AE -ROKE bese tH AND OMEZE EA Le eratiner
350 PRINT AT 10,0;cS;AT 14,2;"Insert your
defective disk"''TAB 2;"and press any ke
y to start": PAUSE 0
360 REM = Picking program names
each successive track
370 POKE trac,1: RANDOMIZE USAR loadbuf
380 PRINT AT 10,030
390 PRINT AT 10,0;d$;AT 10,1;"Lifting nam
es off disk tracks'";AT 13,8;"Track Prog
ram
400 PRINT AT 14,9;''No,
419 FOR n=1 TO 79
415 IF m>1 AND PEEK 57S09= AND PEEK 5750
4=0 THEN LET n=79: GO To 490
off
Name"
420 LET d=n
430 FOR m=1 To 9
449 LET aS(n,m)=CHRS PEEK (57591+M)
450 NEXT m
480 PRINT AT 16,93n3" — "3a8(n)
480 IF n<79 THEN RANDOMIZE USR nexttrack
490 NEXT n
500 REM Placing Used/Free track reco
rd in buffer (Track 0)
UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
S01 PRINT AT 10,9;d$;AT 14,1;"Insteall en 92 STOP
ewly-Formatted disk!!'TA® 6;"and press an (18082 SAVE “repairtt LINE 10
y key'!s PAUSE @
$02 POKE trac,: RANDOMIZE USA loadbuf
503 PRINT AT 19,0;d$;AT 14,1;"'Now re-inse
rt defective disk'''TAB 2;"and Press any The following lines should replace those
kay to continue": PAUSE 2 ‘in the "REPAIR.BA'listing te make the pro
S529 FOR n=*6 TO d gram suitable for the LARKEN systems thet
530 POKE 575244n,245 format to 196% bytes per track i.e. the
Sag NEXT n earlier systems.
550 AEM Compile ths program
namas into C$ array
562 PRINT AT 9,0;d$;AT 9,0;"Reconstructio 435 REM For disks made prior to the Larke
n of the directory will take a couple of n cartridge 00S,modify lines 728 end 830,
minutes!" 'TAS 19;"Plaase wait"! TAB 4; "Co replacing the 34 in each Line with o
mpiling program names"! 33.
578 LET c$(4)=a8(1) 436 REM Use only with the LKDOS system
580 FOR n=2 TO d i.e. 1968 bytes/treck.
587 LET b$=a$(n) 240 DATA 196,368,246, 205, 33,246,508, 176,92,
Mo LET Fae j 69,29, 32,33,16,248
619 FOR m=1 TO @ 25M DATA 17,112,32, 1, 192,7,237, 178,205, 15
, 620 IF b$=c$(m) THEN LET F=4 8,0, 206, 126,0,205
630 NEXT m 278 DATA 112,32,17,16,248,1, 192,7,237, 176
649 IF f= THEN LET exe+t: LET c$(a)=b$ 1195, 368,246,201 ,8
650 PRINT AT 16,11j;cS(e) 3418 LET OM79: LET e=4: LET fet: LET buffe
660 NEXT n re63500: LET neme=636¢81 LET trackno=6361
a
Saeed eid inte ‘ @15 IF n>4 ANO PEEK 63518=0 AND. PEEK 8351
75 PRINT AT 12,0;@)AT 14,0;"Putting & ri ese Me Plat bh aati
. i ue Uradad 9 OE PURE ANG Ere 440 LET a$(n,m)@CHAS PEEK (63505+m)
ee eee ee 489 IF n<73 THEN OUT 84,81 PAUSE 31 RAND
6a FOR n=1 TO e
eee: PAUSE “38 OMIZE USA nexttrack
a PoitesisT0l8. 839 POKE 63527+n,n+127
om on é 819 IF o$(n)=a$(k) THEN POKE tracknotf,k
eee ro es(nm) #1281 LET Fated: POKE tracknotl,249
729 LET namecnene+34
730 PRINT AT 16,11;c8(n)
740 NEXT A
750 REM Poke track numbers in
to buffer (Track #) °
UPDATE’
Saree sral MATE'S LETTER QUALITY PRINTERS FOR SALE
77M PRINT AT 13,0;d$;AT 14,0;"Putting Tre (Going to fast 24 pin Dot Matrix)
+ Two Dais;
ok No's in Directory" Wheel (Centronics Parallel) printers to
7ef FOR n=1 TO e sale, Both exc cond, takes standard ribbon
790 LET fet t) cacts and print wheels available everywhere.
800 FOR k=1 To 79 Both have imaculate typewriter quality print.
810 IF c$(n)sa$(k) THEN POKE trackno+f,k [J Both have WIDE 15" carriage. Single sheet
LET Fett; POKE tracknot?,249 feed and friction feed- no tractor. Both MJ
B20 NEXT k have built in data buffers of 1.5K. Manuals. {J
830 LET trackno=tracknot3d Hook up to any QL or 288 with in line
840 PRINT AT 46,14308(n) ls Parallel intf£c, or TS-2068 with Aerco,
850 NEXT n Guise Tasman intfc. Both prints at 17 cps fy
860 PRINT AT 9,0; d$;AT 19,1;"The director SRSCHs- BAA: S10: FOr Ue8. 00-220 ‘Cn Shea. :
y has been rebuilt!!'!' PAPER 5; INK 2;"'A 1p 3
emove WRITE-PROTECT label from defective 1 PEpece | Cueme -Comeatabla Sane eies'o 2
disk and install. Wtttt Press a key to ome e
save to track @ '': PAUSE 0 These printers require very little software <=
870 POKE trec,: RANDOMIZE USR savebut commanding. Print styles changed by quick [i
880 PRINT AT 114,0;d$;AT 13,9;"JOB COMPLET [ichange of print wheels. Both have Shadow, [iy
ED": PAUSE @ underline, Bold styles for whatever print [Pa
fiwheel installed, Call UPDATE to reserve. a
&
3.5
APRIL 1989 UPDATE MAGAZTNE
UPDATE MAGAZINE
A Capslock indicator for the QL
By Harold Jastrzembski
APRIL 1989
As a professional applications programmer, I generally work on either an
IBM XT/AT or a UNIX workstation.
When several years ago Sinclair USA offered me
a great deal on some new QLs, I jumped at the chance to own a machine capable of
multitasking and I ordered several.
extra memory, disk drives, and a suitable user interface.
After some experimentation, I added 512K of
Given the wide range
of languages available and the ability to remove a program gone bad without having
to re-boot the machine, made the QL an excellent machine to develop and test new
software on. One thing that I found to be a minor annoyance was the lack of a
capslock indicator.
wrong case, simply because I forgot which state the capslock was in. The program
in the listings below was written to correct this situation.
I was forever having to re-enter code that was typed in the
The program CAPS is presented in two formats, an assembler listing for
those with a 68000 assembler and a SuperBASIC program for those who don't.
Listing 1 is the assembler listing and was written for the METACOMCO (r) MACRO
ASSEMBLER. I have kept away from the macro function or special assembler
directives, so the program should port easily to other assemblers.
advantage of the systems multitasking ability to monitor two of the systems
variables, SV_ARBUF(the autorepeat buffer) and SV_CAPS(the capslock flag), and
control a text message to a small windov.
sections, the first being the program header.
CAPS takes
The program is written in four
This header starts with a branch
to the start of the program followed by an illegal op-code used by the system to
identify the location of the job name.
and if needed a pseudo-op to align the code to a long word boundry.
Lastly this is followed by the job name
The next section is program initializion, first setting job priority to
1(the lowest available) so the job runs in the background. Next we
window one character high by 4 characters long in the upper right side of the
screen. Finally we set the character size to the smallest (0,0).
The next two sections are a pair of interconnected loops.
open a
The first loop
starts by clearing the window and then checks SV_ARBUF, the autorepeat buffer,
to see what the last key pressed was.
the program then exits, removing itself from the job scheduler.
1£ the last key pressed was ~
Next the
Q (CTRL Q)
program looks at SV_CAPS, the capslock flag, and if flag is cleared then branch
I£ SV_CAPS is not cleared, then the cursor is
set to the first print position and write the word CAPS In the window. The
program then branches back to LOOP2 and checks SV_ARBUF and SV_CAPS.
to LOOP and clear the window again.
LISTING #1
CAPS -~ A program to monitor the capslock key and print
an indicator message to the screen when the
capslock is set....
t
®
®
©
®
*
t
*
* program.
*
MYSELF QU
MT_FRJOB = =EQU
MT_PRIOR EQU
SD_POS EQU
SD_SETSZ EQU
SD_CLEAR EQU
UT_SCR QU
UT_MTEXT = EQU
APRIL 1989
<1
$05
$08
$10
$2D
$20
$c8
$D0
Copyright 1988 H. J. MicroSystems. All Rights Reserved.
License is granted for all non-commercial use of this
jremove job
set priority
position cursor
jset character size
iclear screen
;setup window
gwrite text
36
UPDATE MAGAZINE
UPDATE MAGAZINE
APRIL 1989
APRIL 1989
SV_CAPS EQU $28088 scapslock flag (word)
SV_ARBUF EQU $2808A jautorepeat buffer (word)
*
* Program header
t
BRA.S CAPS ;branch to program start
DC.L 0
DC.W $4arB sprogram locator code
oC.W 4 7
DC.B 'CAPS' #Program job name
CNOP 0,4 zalign to long word
®
CAPS:
MOVEQ #MT_PRIOR,DO 7set priority to lowest
MOVEQ #MYSELF,D1
MOVEQ #1,D2
TRAP #1
*
LEA SCR,Al ;ereate window in upper
MOVE.W UT_SCR,A2 fright corner of screen
JSR (A2)
BNE ERROR ;if DO not equal to 0 error
*
MOVEQ #SD_SETS2Z,DO sset char size to
CLR.W D1 smallest size
CLR.W D2
MOVEQ #-1,D3 7no timeout
TRAP #3
*
LOOP:
MOVEQ #SD_CLEAR,DO clear window
MOVEQ #-1,D3
TRAP 43
*
Loop2:
MOVE.L #SV_ARBUF,Al ifetch last key pressed
MOVE.W (Al) ,D2
CMPI.W = #17,D2 yexit 1£ *Q
BEQ.S BYE
MOVE.L #SV_CAPS, Al ;fetch capslock flag
MOVE.W (Al) ,D0
BEQ.S LOOP yif clear, clear window
*
MOVEQ #SD_POS,DO 7set cursor to 0,0
CLR.W bl
CLR.W D2
MOVEQ #-1,D3
TRAP #3
*
LEA MESS1,A1 ;write indicator message
MOVE. W UT_MTEXT, A2
JSR (A2)
£
BRA.S LOOP2 ;loop and test
®
BYE:
CLR.L DO jno error
37
UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
ERROR:
MOVE.L DO,D3 ;remove THIS job
MOVEQ #MT_FRIOB,DO
MOVEQ #MYSELF, D1
TRAP #1
*
SCR:
DC.B 0 yno border
DC.B 0
DC.B 0 ;Paper color black
Dc.B 7 yink color white
oc. 30 ;window dimentions
Dc.W 12
Dc.W 448 ywindow location
DC.W 0
*
MESS1:
DC.W 4 yAindicator message
0C.B ‘caps!
END
Listing 2 {s a SuperBASIC program to generate the program CAPS and is
presented for those readers who don't have access to an assembler. This program
reads the code (in word format) in the data statements and pokes it into a
section of reserved memory. Then If the checksum matches, the program is then
saved as a transient program.
To use the SuperBASIC version, you must reset or turn on your QL and type
in the program in listing 2. After saving the code, run the program with a tape
in mdvl (line 280 may be changed for a different drive or filename). If an
"BRROR IN DATA STATEMENTS......." error occurs, add up the numbers in each line
with a DATA statement and compare with the checksums listed below:
LINE 290 110252
LINE 300 130401
LINE 310 168020
LINE 320 108718
LINE 330 152682
LINE 340 118648
LINE 350 129694
LINE 360 38274
CAPS runs in 4 color (monitor) mode only as written, but the assembler version
may be modified to run in any mode and any position. Feel free to experiment with it.
To run CAPS enter exec mdvi_caps into your boot file or load whenever you need a
capslock indicator. To deactivate CAPS, press <CTRL Q>. A note to QRAM users,
this program makes use of destructive windows and to operate correctly with QRAM
you will have to run the unlock utility on it. Have fun and happy computing.
H. F, Jastrzembski
LISTING #2
100 REMark *#*#*#e424 caps pag *#Aeeeteaene
110 REMark A BASIC program to provide a capslock indicator.
120 REMark
130 REMark Copyright 1988 H. J. MicroSystems
140 REMark License is granted for all non-commercial use of this program.
38
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
150 REMark
160 baseaddr = RESPR(200)
170 addr = baseaddr:checksum = 0
180 RESTORE 290
190 FOR inx = 1 TO 64
200 READ a
210 POKE_W addr,a
220 checksum = checksum + a
230 addr = addr + 2
240 END FOR inx
250 IF checksum <> 956689 THEN
260 PRINT#O, "ERROR IN DATA STATEMENTS...... "STOP
270 END IF
280 SEXEC mdvi_caps, baseaddr, 128,32
290 DATA 24590,0,0,19195,4,17217, 20563, 28683:REMark 110252
300 DATA 29439, 29697, 20033,17402, 84, 13432, 200, 20114:REMark 130401
310 DATA 26112, 66, 28717, 16961, 16962, 30463, 20035, 28704:REMark 168020
320 DATA 30463, 20035, 8828, 2, 32906,13329,3138,17:REMark 108718
330 DATA 26400, 8828,2,32904,12305, 26594, 28688, 16961:REMark 152682
340 DATA 16962, 30463, 20035,17402, 32, 13432, 208, 20114:REMark 118648
350 DATA 24786,17024,9728, 28677, 29439, 20033, 0, 7:REMark 129694
0 DATA 30,12, 448,0,4,17217, 20563, 0:REMark 38274
STOP
ED NOTES: Here is how I made this program work. 1. Typed in listing 2. 2. Saved
it to mivl by <save mivl_caps bas>. 3. Ran the program with <RUN ENTER. 4, A
program was automatically SAVED. Later investigation revealed the saved program
name was "caps".
Locking at the listing of the caps bas program, line number 280 does the SAVE
of the code generated in the data statements. The < SEXEC MDV1_caps > command is
on page 54 of the KEYWORD Section of the user manual. The short CODE program may
be run with the EXEC comand. Page 21 of the manual says that EXEC will execute a
series of stored programs "IN PARALLEL" ( hmm ),
EXPERIMEN: I have a disk that I put all four of the PSION softwares in
for faster boot up in FLPl_. The QUILL boot program was re-named “QBOOI".
The other PSION boot programs were saved as "Dboot, Sooot, amd Gboot. So much for
the scenario. So, the next series of steps were accomplished: The objectives will
become apparant soon,
5. <copy mivl_caps to flpl >. 2. <load £lpl_Qboot> This loaded in the Quill
Boot program (without running it). 3. <EDIT 1>, “This brought line 1 of the Quill
boot pragram to screen bottom, where the line was changed to: (1 CLEAR: flp use
3 MDVL_caps >. The modified line was re-entered.
6. <DELETE flpl_Qboot> then <SAVE flpl Qboot>. This eliminated the Quill
t program in disk so that the amended Quill boot program could be saved.
3 (without a toolkit). Then it was saved.
7. <lrun £lpl_Qboot>
Paydirt! When Quill came up running, a little black box appeared in the upper
right hand corner of the screen. Toggling Caps Lock during Quill operation fills
the block with "CAPS", a running indicator of the CAPS Lock switch. Maybe this is
not so useful in Quill, but I can see where it would be for the other three PSION
programs, and many others.
While Hal's Caps Lock indicator was designed to aid programmers while keying
in code, it can be useful to have on a flp or mv for use in programs. All we need
do is edit a program line of any program and install <EXEC mdvl_caps> in the line
of programming. : 2
But I believe that "caps" gives us something else of importance as well.
Isn't this an excellent demonstration of "multitasking" and how to achieve it?
Here we have the Quill software working, and all the time the "caps" program is
also working, checking for Caps Lock condition and displaying the status on screen.
For more on Multitasking see page 41 of the Concepts section of the QL manual.
Want to milti-task another program with Quill? If so, do the Clock program on page
42.
(The PSION disk arrangement works well for me, but the <flp use mdv> locks out
Micro Drive until the reverse programming is used <flp use flp>.)
THANKS HAL, and get off of that IBM as often as you can todo more neat
utilities for us!! We appreciate! _BJ-
2
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE
CAT PRINTS ON YOUR GL
Bob Hartung
No, this isn’t about feline graffiti on the hood of your
QL, but is away of making hard copies of the file
directories on your microdrives. It is an adaptation of
a screen-print only utility provided by Mike Lloyd in
the May 1987 QL World. It also demonstrates the use of a
defined string for device parameters to avoid syntax
errors that otherwise occur, I don’t have a QL DOS but I
think with appropriate changes in SAVE/LOAD syntax it
should work with one and also RAMdisK. Note that the MOV
or disk being cataloged cannot be write-protected as the
temporary cat.dat file is stored on it, then deleted.
CATPRINT
18 MODE 8
20 INPUT ‘Left margins ‘jim: Im$=/’s Imt=Im$ & FILLA(’ ”
yim)
36 OPEN W7,sert
4@ PRINT #7,CHR$(27) & ’E’ ;CHR$(27)
CLOSE A7
56 INPUT “Drive no. ’;drive
68 CLS
76 OPEN #7,sert
BB d3=’mdv’ & drive & “_’ ©
90 OPENNEW 83,3 & ‘catdat’
188 DIR W3,d$: CLOSE #3: CLS
118 OPENLIN #3,ds & ’catdat’
128 INPUT #3,}ine$s PRINT “CATALOG:
$;/CATALOG: ’slines
138 REPeat Toop
& 7B’ sCHRE(27) & “1”
‘sline$: PRINT 47, 1m
148 FOR x = 1 10 18
150 INPUT 43,1 ines
168 IF lines () ‘cat.dat./THEN PRINT line$s PRINT #7
ylm$; lines
178 IF EOF(R3) OR KEYROW(1)=8: EXIT loop
188 END FOR x
198 PRINT ‘More >’: PAUSE
208 AT 2,0: CLS 3; CLS 2
218 END REPeat loop
228 PRINT #7\\
238 CLOSE #3: CLOSE 7: DELETE d% &
248 60 TO 58
258 DEFine PROCedure sv: SAVE mdvi_catprint: END DEFine
‘tatdat’
7X81, s-2020
7x-B1 MANNS) §250,
© cer 505-326-7551
2068 Light
or
Jac
APRIL 1989
Rear, Alph Comm
want. C+
k Strong.
APRIL 1989
NAMBS IN PROFILE
Bob Hartung, 2416 N. Co. Line Rd., Huntertown, IN 46748
Unless a last-nane-first printout is done when this ex-
cellent data base program is used for mail files, a sort
by last names requires they be entered on a separate
line from the title and first name. The following addi~
tion to the Basic listing does a character by character
scan of line one, which may be up to 30 characters long,
then prints the last name fron line two next to the
first. The sort is done by line two. There may be no
more than one space between title and first name(s) in
Tine one entries, The PAUSE and LPRINT in line 7206
assumes the P/F printer driver is in use and not one on
EPROM such as used with the JLO I/F. This line may be
adjusted to your own needs for continuous printout, roll
labels, or envelopes in a web carrier.
7205 14 2$4)"6" THEN FOR X=1 TO LEN C$: PRINT E$(X):
NEXT X
7208 IF PEEK 26703 THEN LPRINT :
@ TO SKIP/ANY CHR$ TO LPRINT *:
THEN GO TO 7226
7207 FOR X=1 TO LEN C$
7208 IF X=1 THEN FOR R=X TO 31: IF ES(X,R TO RX)="
THEN LPRINT " "3 NEXT X
7209 IF X=1 THEN LPRINT E#<X,R) 5s NEXT R
720 IF CODE C$¢X)=0 THEN LPRINT
7220 IF X4)1 AND CODE C$(X) AND E$(X))WS THEN LPRINT E¢
(CODE C$(X))
7225 NEXT X
PRINT KO;AT 0,0;"Key
PAUSE 0: IF INKEYS="2"
BREAK-IN FOR CATS
When a CAT directory contains more than one screenful of
file titles, Keying BREAK with the following routine
will halt the display at the desired screen and go to
the title-input for SAVE or LOAD. The SDOS syntax as
given will need to be adapted to that used by your DOS.
10 ON ERROR GO 70 20: CAT
20 ON ERROR RESET: INPUT ‘Title to LOAD:
30 LOAD /t$: REM Or SAVE /t#
ts
|-3D Tapes
im Cart, VU-3D
a Tasues, _TS-2068
32 Pttr Flt
gk drive Call Days?
/raper
w, ,
pen nga and. Di
Joe Wilkerson mesa,
i ested in Packe™+
a3 ASEene Ave, Lakeside, cA
u BBS NEC.
UPDATE MAGAZINE
UPDATE MAGAZINE
288 TO Sinclair Transfer Link
Link Up Software by Sector Software Ltd.
Now available at your QL Dealer
Want to use your QL to SAVE 288 files? To
print Pipedream files? To move files between
Pipedream, Quill and Archive (either way)? To
dump a whole batch of files from 288 Memory to
QL Disk Drive, amd back again? To read 288
files on the QL monitor screen?
Update has received the OL-288 Link software,
and it is incredibly easy to use. 288-QL Link
consists of a single MDV cartridge for the QL.
Also needed and available from the QL dealer
isa serial cable to connect between the
serial port of each computer.
There is no device needed at all for the 788,
just the serial cable. One can make up a
serial cable, but there is a slight difference
in the thickness of the pins in the connectors
for the two computers which prevents a QL
serial connector from being used at the 288
end.
All of the documentation for using the Link
software is contained in two “Read-me" Quill
doc files in the miv. The two files loads to
Quill for reading or for print out. The
instructions are seven: pages in length and
seem to be quite adequate.
Now for some jesting. Wouldn't you think that
literary material coming from England would be
couched in imaculate English prose? Dig the
dangling infinitudes and split geraldoes in
the following exact quote, including
puncuvation, and which adds a bit of technical
detail to this report: (QUOTE) "When the file
is being transfered as each carraige return is
sent a display at the bottomof the screen
will show the number of lines sent, this is
for your information only and is not used or
remembered by the program. A '*! star may be
used in the filename as a wild card, this
means that if you give the name 'flp_inv*"
then the QL will send all files on Elpl— that
begin with inv to the 288, eg. invoice,
inv_bas, and inventory are all files that
would be transmitted, if your are using a
wildcard name which may send a few files aross
to the 288 then the z88 will have to be in
batch receive mode, after sending all of the
files files press 'E' from the main menu on
the QL to send a 'Endbatch' signal to the 288
to terminate the batch receive mode on the
288." (end quote)
I had to resort to the ole high school
sentence block diagram to decipher that piece
of the King's English, but never the less if
you read kinda fast the meaning grabs you
fairly well. -And from England yet!! and
here 1 thought that I was the Champeen
particycle dangler of the 21st century! Iff'n
Cornwallis had had that guy to confuse the
enemy, we'd still have Brit agents collecting
APRIL 1989
APRIL 1989
tea tax in Boston.
And did you know that the Canadians have 999
different meanings of the two letter word
"eh", eh? The differences are translated by
inflection and only two can be expressed in
weiting (with a question mark or exclamation).
This software is 'version 2' which transfers
both Quill and Archive files to the 7288
Pipedream. The writer explains that another
version will be coming out soon, and a free
exchange of mdv carts will be made upon
receipt of the old one. I dont know how that
will work from across the Atlantic. This
looks like a "must have" for owners of both
the QL and 288. --~~--BJ.
TS 2868 VARS SAVE AND RELOAD
£08, DISK SYSTEM VERSION
Brogram by gilt songs
Modified for by Dunnington
9900 LET agar VARS=1: LET
He@=1 "2 LET Y=" 1h
‘: LET Las"
airiai"
ga10 cer: vans « PEEK 2962742562PEE
K 236. 1 TO 1: NEXT NW
Seis Cer ELINSPBER 23641+2562PEE
osee LET X$=STR% (PEEK 23627): L
ET Y$sSTR# (PEEK 23620)
S28. a LEN X<3 Teen Lee X#S5TR
6a TA VAL
3080" fe LEN ao aaa THEN fer YS=5TR
$ Q@+7$: GOTO
9935 LET LS= StRs. CEL IN WARS-1)
9940 IF LEN L$<S THEN LET L#=STR
% O4L3: GO TO so48
9945 LET Z$=L$+ OD"
9859 | er Hee =PEEK Boca 1+2S64P EEK
aaes PRINT “ELIN=";ELIN; TAB 12;"
EADR="j PEEK 29541+2563PEEK 23642
“VARS Z VARS; TAB 12; "VADR="; PE
23627+2 S6sPEEK 23628°° "LENGTH
L$; ’’"LENGTH YERIF="; (PEEK 23
Soe tBRE RP EEK 2 23042) ~-(PEEK 23627+
155
€0;TAB 14; “VERIF
6414+2564PEEK 3642-1)
9978 PRINT ° "ENTER WHEN READY":
cee @: SAVE #Z$CODE VARS, VAL
9972 REM ae lees ead
9988 CLEAR : cAT
9985 DIM K$i9): rheuT “INPUT 9 Cc
HR TITLE OF UARS cop! “| Ke: DIM
9990 POKE 23297,INT (VAL K#i TO
5/256): POKE 23296, (VAL KBi TO
5) -PEEK 202972256)': LOAD #KSCODE
{PEEK 29627+2552PEEK 23628):
9995 LET N=PEEK 23627+2564PEEK 2
3623+PEEK S3206+2564PEEK 23097:
POKE N,128: LET N=N41: POKE 2364
2,INT (e286): POKE 23641,N- PEEK
236422258: POKE N-1, 128
41 UPDATE MAGAZINE
UPDATE MAGAZINE
APRIL 1989
@L MAIL FILE HINTS
Bob Hartung, 2416.N. Co. Line Rd., Huntertown, IN 46748
I received from Dick Wagner some coments and questions
about the UPDATE listing and the issue disk/mdy version
which suggested that the info I sent him might be help-
ful to other users also. Because it was written with
the intention of demonstrating some elementary Super
Basic programming concepts which can be modified and en-
larged upon by the user it obviously lacks many of the
refinements and features of Archive, which can be used
for mail files and much, much more.
Perhaps 1 should also mention that the listing and the
accompanying text in the October UPDATE were both typed
into TASWORD on my 2068 because at the time I didn’t
have a printer hook-up with my QL that would produce a
decent master for Bill to copy. Also, I only had a QL
that was working properly or at all about 2 months of
the 14 preceding last Christmas. The rest of the time it
was either down or away for replacement or repair. I
finally sent it to Dan Elliott who did the repairs right
for me and also made some changes in the power supply so
all voltages are pre-regulated outside the computer.
This has eliminated about 90% of the heat build-up
inside the case aswell as the power surge, RFI, and
oscillation problems, The display now is steady as a
rock, even in TV mode.
The listing in the issue disk/mdv program is correct as
is, but in the process of translating a Beta Basic ver-
sion of the program to Tasword, I missed lines 140 and
170 in the UPDATE listing. They should have been:
160 CLS
170 IF c# INSTR #$(n,1 TO 115) THEN 60 SUB 200: PAUSE
Jt is interesting--and also can be very frustrating
o-that a definition such as £$(n) will work sometimes in
a situation such as this and sometimes will not, so a
full definition of all the parameters is the only sure
way to go.
In the process of de-bugging the issue MDV/disk version
which allows user-defined and named fields of any length
and number (within RAM limitations, of course!) 1 noted
a quirk in the sort routine which sometimes keeps it
from a correct sort with an even number of file-items.
This was corrected by adding a counter (cnt) to lines:
30 LET melast: LET ssw: LET cnt=0
40 LET s=INT(s/2): IF s{1 AND NOT cnt THEN RETurn
70 LET jen: cnt=0
83 IF #$(j,21 10 40))#$(j+s,21 70 40) THEN LET x$=f$(j,1
TO 145): LET 4$¢j,1 TO 115)=4$¢j+s,1 TO 115): LET £$¢j+
sy] TO 115)=x$: LET j=j-s: LET cnt=cnt+1: IF j)Q THEN GO
TO 80)
APRIL 1989
42
A printer formatting routine was purposely not included
in the program as given because practically every Kind
has different command-sequences. For example, to set a
45th column left margin for addressing envelopes on my
C. Itoh 8510 this sequence would be needed at line 1300:
1300 OPEN #7,SER1: PRINT #7,CHRS(27);"LO45": CLOSE #7:
60 10 500
A universal left margin setting may be provided by the
following, using Im$ as PRINT #7,]m$;t${n, slice):
1300 INPUT "Left margin col: "jim: Imd="": Im$=Im$ & FIL
Ls(* *,Im): GO TO 500
The prompt in line 980 of the printed listing would
probably be less confusing if made "Key ENTER to Keep,
$STOP, or % to delete item LINE # to EDIT". The entire
file~item is deleted and the last-item counter is
decremented by one if % is entered as the very first
input. An item-line to be edited is selected -by a
first-input of a single digit, 1~é. The re-definition of
4$(n,21 TO 40)="zzzzzzz2z22" during a delete is used to
properly re-order item(s) to be deleted to the bottom of
the file instead of to the top where they would
otherwise go if sorted after #$(n,1 T0 115)="". A full
definition is needed here instead of just f9( .
One of the drawbacks of using arbitrarily-defined fields
for data such as this is that the ones that work fine
for me may not meet your requirements. To enlarge the
sizes of the respective fields beyond the total of 114
characters (plus the one in 115 for first-name Jength)
the DIM #$() statement must be changed in line 770 in
the printed listing. Then every line must be changed
that defines #$<n,1 70 20) for first-name field, f$(n,2i
TO 40) for last-name field, etc. With a 400-item
dimension of the #$ array the sorting time takes several
minutes when the file is filled to this size so you
might want to do sorts only atter an EDIT and from the
menu instead of following every set of new entries.
The "y/n* options as given accept only lower-case inputs
which may be changed in lines like 350 in the printed
listing to: IF yss*y" OR y$="Y" THEN... .
Those who have the issue disk/mdv version also have two
versions of a menu-loader routine which resides in the
BOOT file and displays up to 34 file names. Unlike the
auto-directory 2068 users have with their SDOS routine
this one requires manual input of each name in the nenu,
but only a single Key-stroke then is needed to LRUN the
file selected. The one version saves and loads as data
this user-entered directory and the other version brings
down into edit mode a string-definition line into which
a file name is entered. The latter loads more quickly
since ail the data is contained in the listing itsel#
rather than in a separate data tile.
UPDATE MAGAZINE
UPDATE MAGAZINE
APRIL 1989
A @L LLIST UTILITY
Bob Hartung, 2416 .N. Co. Line Rd., Huntertown, IN 44748
This routine may be of particular interest to those such
as Bill and mysel# who do QL listing printouts in column
format as master copies for publication. A simple OPEN
fnyseri: LIST Ans CLOSE #n will send a listing to the
printer but unless your printer has right-nargin setting
or colunn/Jine setting, long listing lines will splatter
the full width of the page. If the left margin is set
far enough over to allow only the desired number of col-
unns to be printed before the printer does an end-of~
line CR/LF the listing lines will be done properly but
will require a cut-and-paste job to prepare a copy
master containing more than one column of listings.
Of course, anyone who paid close attention to Bill’s
tutorial in the January UPDATE on importing files into
QUILL no doubt has figured out how to do this with
listings. Once in QUILL, they may then be edited, have
margins re-set, and be printed out as any other QUILL
file. However, since OL command-words are treated as
real words the printed right-hand margins will either be
unjustitied, with no word wrap-around, or if justified
will have spaces inserted so the printout will not quite
correspond with the on-screen listing. Also, there isa
considerable amount of footwork involved in all this.
All we actually need is to somehow get each line of the
listing into a string which can then be sliced any way
we want it. The following LLIST was done by reading each
Tine of the Basic listing as data for input into p$. The
command codes to set line-spacing, font, etc. may be
inserted into line 20 for your printer or else that line
may be onitted if you elect to use the pre-set ones or
use panel settings.
The routine begins with the selection of the drive no.
containing the progran to be LiISTed, then displays a
directory of the files in that source drive. Key FS for
more than one screenful, An error repeats drive and
title entries, or @ (or q) to quit. The entire Basic
file is loaded into RAM as data and the printout then is
done from a succession of p$ definitions obtained by
accessing this data from RAM.
After the data is loaded, the first prompt asks for the
number of lines to be printed in this pass (including a
title line and one space-line if the title option is
selected). An input of @ at this first pronpt allows the
program to be aborted with all channels properly closed.
This is done automatically if an end-of-file (EOF) takes
place before the selected number of lines is printed.
The second and third prompts ask, respectively, for the
desired colunn-width and left-margin settings. Since
these are done with string-slices and string-spaces in-
stead of comand codes they will work with all printers.
APRIL 1989
Repeat passes allow re-inserting a page and changing
these settings to print side-by-side listing columns
that begin with the next line after the last previous
‘one which was printed from the sane file-loading.
QLLLIST
1@ REMark Enter YOUR printer codes in line 28 or omit 20
if not needed
28 OPEN H7,seri: PRINT #7,CHRS(27);/Q” ;CHRS(27) ;’T11’ jCH
R8(27) 370’ FCHRS(27) 57!’ CLOSE 47
38 WHEN ERRor : PRINT #O\y$;/ not found--check entry’: P
AUSE 200: 60 70 38: END WHEN
48 CLS: CLS AB: INPUT #0;'Q to quit’\\’LLIST program in
drive W/ydru$: md$=/ndy’ & dros & /_/: IF drvt="q’ OR dr
v$='Q" THEN STOP: END IF
50 PRINT ‘Key F5 TO SCROLL DIRECTORY’: PAUSE 106: DIR nd
$
68 INPUT M0; ‘File Nane? ‘;y$: mdt=nd$ & y+
78 CLS #8; curtn=O: remin=@: REMark current line; renain
ing Tine
88 OPENLIN #8,md$
98 OPEN H7,ser]
188 CLS: INPUT ‘Enter zero to cance) ‘;(y$)\\/No. lines
this page-coluan: ’;lines: IF lines=@ THEN CLOSE #7: CLO
SE WO: GO TO 30: END IF
11@ INPUT "Columns per lines ';col
128 INPUT ‘Left-margin setting: ‘;lm: Ims=/‘: Ind=In$ &
FILL$<’ ’,1n)
13@ INPUT ‘Key ENTER to skip title-print any chr to
print ‘sts JF t$ 4)’ THEN tld=“’s tld=tls & FILLS(’ *
yINT(co1/24 Im) -INT(LEN(y$)/2)): PRINT H7, t1$3y82 PRINT
7: END IF
140 cnt=@s IF t$<)’/THEN cnt=2: END IF : REMark count pr
int-lines
158 IF remin<)® THEN cnt=cnttcurin-remin: 60 70 258
168 IF EOF(#8) THEN CLOSE #7: CLOSE #8: GO 70 38: END IF
178 INPUT #8,p$
188 Ip=LEN(p$): IF p$(1p)=/ ’ THEN Ip=lp-i: END IF
198 IF Ips=col THEN PRINT H7,In$;p$s cnt=cntels IF cnt=1
ines THEN GO TO 100: ELSE GO TO 148: END IF : END IF
280 curln=INT(1p/col)
210 DIM 1ins<curin,col)
228 FOR n=@ TO curtn
238 Vin$<n,1 TO col)=p$(colanti 10 Ip)
248 END FOR n
250 FOR k=remln TO curtn
268 PRINT 47, Im; 1in$<K,! TO col)
278 cntecnt+i: IF cnt=lines THEN remin=K+i: IF remlndcur
In THEN remin=@: END IF : GO TO 108: END IF
288 END FOR k
290 remln=8
308 GO TO 168
310 DEFine PROCedure sv: SAVE mdviQLLLIST: END DEFine
43
UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
BOB'S. JOTEBOOK
Let's get back to some programming for a change. I have two
interesting utilities from my notebook.
sesame FOSS SESE SETTERS AAAS
.1. RENUMBER TO 10000+
sa caeen noe enees see SSeS SoS SSS
When you are faced with’ using the MERGE command to Join ane
of your utilities with another program, the first problem is
whether there will be a clash of line numbers. Keeping your
Utilities (the ones written in BASIC) above line 7000 or so is
helpful but there is no guarantee that some. programs have not
gone into this area. What to do? First, if the utility can be
written in machine code or compiled via Timachine, that is an
obvious way out. But if BASIC is the only way, then here is the
solution.
"Renumber the utility starting at line 10000. Right, that’s
what I said: ten thousand! Then there will be no danger of a
. line number conflict of interest. Type in the program below and
SAVE it. ¢
1000 REM Renumber to 10000 plus
1005 REM Bob Mitchell 1989
1010 REM Do not leave out lines 1000 and 1005. Change them is OK
1015 CLS : PRINT “This utility allows renumbering to lines highe
r than the usual 9999." The current start line is set at10000
« Ling numbers increment byfive." *
1020 PRINT '"To set a different start line use <GO TO 10040) n
ow. Now, MERGE the program to be renumbered. *
1025 PRINT '*DELETE the lines of this utilituby using <DELETE 10
000, 10095>."
1030 PRINT *"Change all GO TOs etc manually calculating them ca
refully in respect to the new start line.”'’"When ready, use *
RANDOMIZE USR 320007 to renumber.” +
1035 STOP |
1040 INPUT "Start line # 7 “yline
1045 LET line#line-5
1050 RANDOMIZE line
1055 LET hi=PEEK 23671: LET lo=PEEK 23670! POKE 32004, lot POKE 3
2005, hi ; :
1040 STOP: . ?
1065 RESTORE 1070: FOR i=32000 TO 32030: READ at POKE iyat NEXT
it GO TO 1015 : ‘ fe
1070 DATA 42, 83,92) 17) 11139) 237575
1075 DATA 759211671237 16672001976 «
1080 DATA 54195 16,253, 114,95)115,95 ‘
1085 DATA 78) 3557017) 35; 24;251,0
1090 RANDOMIZE USR 100: SAVE “re#i0+.B2" LINE 1065
1095 STOP . o Sa .
Try this program on itself. GO TO 1045 then RANDOMIZE USR
3z000 and LIST. All the line numbers now start with a colon <*>
which is the next character after <9> in the 782068 character
set. Thus it represents <10>. If you choose’ 11000 as the start
line, the first "digit" in the line numbers would be a semicolon
(3) and so on.
Now MERGE this program with your favourite short utility.
Change all your GO TO and GO SUB numbers .to the line numbers
they will represent after the renumbering is doney noting that
the line numbers increment by five (5) only. I have deliberately
chosen a renumber routine that does NOT renumber GO TOs and GO
SUBs because those that do will not handle line numbers over
F799» ci 7
Once the renumbering is done, it is impossible to edit the
lines, hence the need to change these GO TOs etc manually.
DELETE my utility as indicated in line 1025 above. Theny
use <RANDOMIZE USR 32000> now to renumber your utility and SAVE
it.
— ARES
44
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
TASORT~ & TASWORD UTILITY TO SORT LISTS
2
seceerssossnseneomes
. As the title infers, this utility will sort Tasword lists of
up to 240 lines or 15360 bytes. Each record in the list must be
only one line long, but with 64 characters per line there is
room for a lot of material in any list (eg, birthdays and
anniversaries, long play records, telephone numbers, things to
do, diaries, program descriptions on disk or tape).
You may sort all or part of a list, or Just the list. in a
longer Tasword file. When your list is saved in the usual
‘Tasword manner, ensure you have noted the file text length
(variable <a> gives this), list’s start and end line numbers and
the column number to sort on. ‘The program prompts will walk you
through the operation and when finished, the program. along with
its newly sarted list will have been saved ready for loading
into Tasword. Respond to all <scroll 7> prompts with a <w>. :
for compiling via Timachine and there
pe in the. tuo
listings, compile the main program and save,it in the usual way
and save the loader. The utility is then ready for use.
Try it on your favourite “Tasword list, bearing in mind the
limitations explained above. It should only take a ‘few short
_minutes to get the Jab dane- :
One thing more: the display of the lines in the list uses
Tasword’s companion piecer Taswide, ‘to present it in a 64 cpl
format. If you do not have Taswide, change. line 230 to read!
CLS: FOR i#n TO PRINT d&(i)® NEXT i .
and remove <RANDOMIZE USR 100% LOAD *kaswi.Cx"CODE> from line B
of listing 2.
Listing 1. Tasort
40 REM {UBR 28000
SO REM ! LPRINT
60 REM ! LIST
70 REM !LEN h#<=64
BO REM HINT toa,abs Sf1aydsCr@rsrMrisdst
90 REM ! OPEN #
100 CLS
Eah LET oa=SGN PI! LET ob=2! LET sf=64t LET a=47615! DIM d#(240
A :
sue INPUT “length of text? <#15360"'b? IF b>15360 THEN GO TO 1
130 LET c#INT (b/ef)
150 INPUT “start line? "36
15Z INPUT “end line? (O=last)"se
153 IF e=NOT PI THEN LET amc
154 LET elimat( (e-1l)*sf)
157 CLS # PRINT “loading text from"’"line "isi" to line "FeE"ee
160 LET n=s
170 FOR ieat((e-1)*sf) TO @i STEP sf
180 FOR JsNOT PI TO 63
190 LET dé(s,J+aa)=CHR® PEEK (i+J)
200 NEXT J n
210 LET sas+oa: IF s>e THEN GO TO 230
220 NEXT i: STOP z
foe ree 1 RANDOMIZE USR 64300:FOR isn TO at PRINT CHR®3}d@(i)e
240 BEEP oa,10: INPUT "issort O=save? “sas: IF NOT ss THEN GO
TO 440 ; ie
255 INPUT “sort on which col.? (1-63) "at
260 CLS ? PRINT “sorting on col. "it! GO SUB 300 GO TO 230
290 REM sheli-faulk sort :
300 LET -sn=@
310 LET sn=INT (sn/ob)
320 IF snsoa.THEN CLS : RETURN
330 IF sn/obsINT (sn/ob) THEN LET s
45
APRI
L 1989 UPDATE MAGAZINE
UPDATE MAGAZINE
APRIL 1989
B40 FOR tan TO ansi
SU LET mms =
360 IF de (mm, t TO, <edt(anitsn,t TO > THEN GO TO 420
370 LET be=de Cn) Erato
BIO LET: de (nm) mde (mmten)
B70 LET d#(mutan) hit
400 LET yrwornin-sity | 78 2
410 [F mm>0. THEN Go TO 360 _
420 NEXT 4 ave
430 60 TO 310 :
anQ CL8 1 PRINT, "storing sorted Tile for BAVE...76 LET sent FOR
jeat((s-valtet) TO-wl BTEP sf ©
AIO FOR Jeno PL TO 43
460 POKE ‘C14+J), CODE d#is,J+oa)
47Q NEXT J i
400 LET sestoat IF ade THEN GO TO 492
470 NEXT 4
AGA STOP
495 REM ! CLOSE tt
S5U CLEAR «| RANDOMIZE UBR 100! GAVE "tasort.Bp* LINE 100
5 CLS | PRINT INVERSE 1y"TABHORD SORT") INVERSE OF" by Bob M
ltehell."'' "This utility will sort Tasword lists of up to 240 1
ines (15360 bytes). ” : . :
@ PRINT '*Have the following parameters ready from SAVED lt
etre "a, tect Length"' "2. start line number "?"3. and Ling numba
rif not last’ 4, colum # to sort on (1-63)."
7 PRINT ‘"Ingtall disk containing lint to be sorted! then
press a key."! PAUSE U ? : :
© RANDOMIZE USN 10UF LOAD “taswi.Gx"CODE # RANDOMIZE UB 100%
LOAD "kasort. Ce" CODE 28000
10 INPUT * TASWORD SORT "' "List name7 max 6 "Ff LINE nfs RAND
OMLZE US L008 LOAD n¥+". CT" CODE 47615
20 ON ERR GO TO 252 RANDOMIZE UBR 28000: GO TY 30
23 ON ERR RESET? POKE 23607,601 GO TO 55 :
SU LET bePEEK 3QO7B+256*PEEK 30077! REM sa@ nota 1.
AO INPUT "List name? max 6 "f LINE n@t RANDOMIZE UBR 100+ GAVE
ng+". CT" CODE 47615,b : :
30 CLS ! PRINT "Sorted file has been saved and is ready for 1
vading into Tasword"
35 INPUT "iemore Onquit "fm
56 IF m THEN GO TO 5 fen
57 IF NUT m THEN STOP :
60 CLEAN = RANDOMIZE UBR 100: BAVE “tasort.Bb” LINE 5
NOTE 1. Ling 30. This gets the value ‘of <b> in the compiled
program. . The PEEK addresses may. change depending on wour
compilation list of variables. Senne
NOTE 2. The listings above have been entered into Tasword using
the Sequential Filg routing. in the Laken Version 3 LIKD08 EPROM.
This was covered in my article in tha Sep-Oct issue of BincoLink
page 10. . .
Bob Mitchell Willowdale, Ont 881115
os — waqréd —
A Corrected Listing of "Train Dispatcher”
published In "The Ins and Outs of Timex
TS-1000" by Don Thomasson, Want either a
TS-1000 or a QL Version,
Arnold Nieuwenhoff, 16 Heritage Rd, Sutton, MA 01590
MoTice. P
UGE list of TS-2068, QL, TS-1000, Tandy 1009
items for sale: SASE or Compu Serve
75036,616. Barry Carter, PO Box 614, Warren,
MI 48090. (313 537 8559).
46
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
LKDOS SOF T-WARE ge
MAXCOM 300/1200 baud Terminal/BBS
This full feature modem software lets you effectivly link the modem ta the disk, so you can upload or
download files larger than 100K.This lets you send NMI saves and large text files as well as Basic or Code
files, which other modem programs couldn't send because of memory limitations. Also files can be sent with
or without a Information header (Spec-term compatible) .
It alse has 2 64 column display and is the only 2068 modem pragram that will run at full 1200 baud
without missing characters. Other features of the terminal made are IDM graphic characters, auto-dlaler,
macro keys, 110K disk buffer for captured text, auto repeat keys.
The BBS Is the most elaborate available for the 2068 and allows the remote user full access to the disk
drives similer to a CPM BBS. Features of the BBS are - 300/1200 baud, operation with fast reponce even at
1200 baud, Passwords, priority levels, Use time limits, Multiple Message Bases, Uploads and Downloads are
not limited by Memory, Oual Window Monitor screen, interupt driven time aut and Hangup protection, Also
Keeps 8 User log of callers Names and Activity on disk so a printer Isnt needed and its easily customised and
expanded.
MAXCOM can be used with the 2050 modem or with the Z-SI0 RS232 interface and a 300/1200 baud
modem. (a version for the Aerce ASZ32Z Is In the warks). :
PRICE: $24.95
LARKEN DISK EDITOR. |
This program lets you examine or change any byte on a LKdes disk. It is useful In repairing damaged or
glitched disks, changing the disk Name or head speed etc. You can also examine the track map and disk Info
headers.
The documentation for the disk editor also includes Information on how to access LKdos from Machine
Code and information on the structure of the disk catalog and data blocks.
PRICE: $15.00
SEQUENTIAL/RANDOM Access FILES
This utility is a ram resident extension to the LKdes operating system and lets you create, read from, or
write to very large data files kept on disk. It uses the commands OPEN#, CLOSE#, PRINTR, INPUT#, and
INKEYSH to access the files from BASIC. There Is also 2 high speed search command far finding a text string
within the data file. Using the TAB command, you can randomly access directly any record in a file.
The utility 1s easily used within your basic programs and has a lot of uses, from storing large date files,
creating large spell checker dictionarys or even converting you basic programs to an ascil text file .
This uttlity lets you take the limits off of the data capacity of the 2068 Files on disk can be huge !
A simple data base program Is included on the disk to demonstrate the utility.
PRICE: $ 15.00
Coming Soon from Larken Electronics
ee The Larken Desk Top Publisher «» Produce high quality printing (like this page ) with an epson compatible
printer and LKdos, The entire Hi-res graphic page Is kept on the disk and scrolling though the page is as easy
as clicking the joystick or mouse on the {con type manu. Text and Graphic editing with multiple sized fonts
will aise be featured.
#* Spell Checker for Taaword and M-Script »* This utility program will let you have your wordprocassor
text files be checked by # 350K dictionary.
All Prices $US - Specify type of drive when ordering.
LARKEN ELECTRONICS RRYZ NAVAN, ONTARIO CANADA, K4B-1k9
(613)-835-2680
APRIL 1989 47 UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
woop AMD wWinNpD COMPUTING
Hil1 Cable : RR 2 Box 92 : Cornish, NH 09745 1 603 675 2218
QL SOFIWARE AND INFORMATION
A Special Group of ‘Tool Kit functions that work with both
expanded and standard Q's to provide complete MDV and Disk
Management of files and programs. Ideal for use as a BOOr
program to manage an entire MDV or Floppy Library.
DB~PROGS A 22 Page Manual that describes Six Wood and Wind "Archive
Related" programs, what they do, and how to use them.
A program that splits Data Base Files into two distinct parts
DB-TULR
for management and re-save.
JOIN A program that Joins two Data Base Files.
A 25 page manual and 256K Floppy that comprise a "Learning
Shell" for the Archive Data Base Software.
REFIELD A large program that greatly expands the Archive Software.
Each of the above programs are on MOV or Disk and are supplemented with a
manual, plus stored "read-ne" files. Other business application software are
available. Send $6.00 for a package of manuals. Then selectively order the
programs that interests you, Or send $2.00 for a complete listing of all
products, and brief discriptions. (Address above).
BILSOrt
Software for the QL. that really works
We have business and technical software ta do real (tax deductible)
work. Prices .range from $9.95 for, QLUTter or QLUSTer, resident
boot utilities, ta $2850.00 for a CAD site license to design
4 circular cams and generate CNC code to a vertical mill controller.
fGthers include TAX-I-QL, an ABACUS template for your income tax;
MAILBAG, the, best addréss database we've ceen; QLAND_LORD, .a
property management application; TRUST_FUBD, a portfolio and asset
manager; and RECIPES for the caok - all at just $19.95 each.
DBTIutar is a handy flash-card program to teach yourself anything
you need to know, including Spanish and QDOS, which are provided;
: DBProgs has 5 useful Archive utilities. The_Transfer_V3 laser
prints desk top publishing files. There is other good stuff, tao.
} Generally, prices (post paid) are under US$20.00 on DSQD Disk, but
like CAM MASTER, some are a bit more. For microcartridge add 82.00.
Please send for gur latest catalogue which explains our offerings
in greater detail than ic possible here. It hae a demo diek for
the CAD program, CAM MASTER at only $6.95, .
Look for our table at the CATS CapitolFest with show speciale.
BMSoOLt, P.O. Box 68703, Boston MA 02114 (617) 889-0830
APRIL 1989 UPDATE MAGAZINE
$4.95 per copy April 1989
Issue
a y 00 Year Subscription
OF SIN CLAIR COMPUTERS
ADVERTISING RATE SCHEDULE
effective until July 1989
UPDATE MAGAZINE is published quarterly each January,
April, July, and October in_ support of the users and
suppliers of the SINCLAIR QL, SINCLAIR 288, AND
SINCLAIR-TIMEX TS-2068.
The following Ad sizes are based upon a page size of 8
1/2 inches by 11 inches. Ads are black and white only.
Reduction and enlarging capability exists for ads that are
off size. Camera ready copy should arrive at least 15 days
before publishing date.
DISPLAY ADVERTISEMENT RATE SCHEDULE
AD SIZE PRICE
2 pages $220.00
1 page 120.00
2/3 page 90.00 (vertical or horozontal)
1/2 page 65.00 (vertical or horozontal)
1/4 page 35,00 (vertical or horozontal)
1/8 page 20.00 (vertical or horozontal)
Special placement of full page or double page ads, add
10% and call for reservation (inside front cover, first pase,
inside back cover, back cover).
Line ads: 78 characters per ‘line across page, | line
mime: $6.00 per Tine. Will be type set to Elite 12 Chrs
per line, i
Your existing Ad .copy for other publications is fine.
Just send copy with instructions for sizing (up, down, or
same). Enhancement of legibility is usually possible. Draft
quality dot matrix print is not so good.
: TERMS: Check Payment with order 10% discount, or
billing on publication date. (no credit cards).
Send Ad copy to: UPDATE MAGAZINE, 1317 Stratford Ave.,
Panama City, FL 32404, Tel 904 871 3556 or 904 9871 4513
4g
UPDATE MAGAZINE
[seme cre
ee a APRIL 1989
wee LKDOS SOFTWARE fw
McBrine Computer Products announcment
—~ MAXCOM -- 3090/1200 baud Terminal / BBS.
late received a letter from Mc. Z Sonniete, communications 6/# for the LXDUB-7068
- wud with the or 1200 baud witt
William J. NcBrine (McBrine Computer ho missed characters. 200 requires 7-810)
products, S14 S. Jackson St. = 64 column Terminal Mode with JBM Graphics
Salisbury, NC 28144). Bil] a‘enounces: futo gladly Mi oe wires’ £ ialse be tdioi
- Powerful kemote usar W responce
that he le suspending tle activities Power fal haw te eee ate te coat
of his software company and converting Hult window, Direct access to, eine and mo
all of his software, both past and ~ Direct ‘modem, to disk’ Xnodam
future to SHAREWARE. Users are vere Sigs ~ Teeth a Th
encouraged to distribute the software
to "all ard sundry". ‘Those receiving
ace ask to contcibute “what they deem oy ac ir
it to be worth" to Bill at the above OREN CLOSEM PRINT! iNeUre pi ace teh benkc
address. Bill has served the rene en vewd -
Sinclaie — community val with good .
software and ard we hope that he ARKEN DISK EDITOR
continues to PRODUCE. Update will = fined alte Meader, ek floret a
communicate to offer assistance to Price 1 92
that end, UCDOB BHARE-HANE UISK (Originel programs required?
MULTI-TABKING Tanword. Lets you be printing one
file from disk while working on snother. Aerea CPL
Spullink: I apologize to = ART-BTUDIU patch for LKdos. MC cansete routines
converted to disk.
uc. Confucius for - Spec-tere 64 Lkdos ovarlay. Bava Basic or Code
referring to Abacus as bee rs to disk with’ no mensing about.
peepee x. Onder TOW POAT voftvara requicve ‘LKvus cartridge pric: $6o)
oftmare regu car cmt
many Chinese can spell (Prices 908.) (Gand cash for values leon the #20)
licorice, or Lickerish? LARKEN ‘eCEETRONICS, RRHZ NAVAN ONTARIU, CANAUA K4B-11T
oe
LARK producte, includ
SRE co RAN DISK HERE, oa Boftwarg uelii ties, sce
REG. ERPRIZES, 14: 2 Ith
$5 70g]. Boll ae iB have oxteralve
Listings of mer products. See ids in thie
PRINTER?
VE CAN HELPT
RHO can supply many top brands at low
prices, Names Tikes CITIZEN-STAR-ALPS
PANASONI C-OKI DATA-EPSON-SEIKOSHA
BROTHER AND HORE!
The 288 ingerts/exports work
(les rom both 12M and Macintosh
We Support the Z8al
Ye et ee ou to ina that we will be
rting tha to the est of aur abiltyt
re ers is anything that-you would like aes CHECK THESE OUT! ane
gue, 20 computer, be macy et ae knoe TAR NK 2800 24 PIN ONLY $924.95
1s more aod = sae come Arailabie ROTHER HL LOD ONLY 8164.95
(or Lip flow now portable sempaten ae wa STAR HK1000 HULTI-FONT ONLY $100.00
a ee ema STAR NX1000 RAINBOW ONLY $237.95
STAR NK2400 24-PIN ONLY $337.95
Air rare iatiypation a floes, contact SEHeEN’ Sooo"! GHEY $139.93
ff af tke adtess ar plore Gite belove CITIZEN 1600 ONLY $175; 00
a eee et een neni
Please add #15 each for sh. & Ins,
We also have MANY used printers In
ttock-write or call!
RNG ENTERPR SES
27 E
OREGON’ CITT, “OREGON 7048
803/685-7484 + NOON-10 TUE-BAT
RNG ENTERPRISES date
1417 1/2 7TH STREET
OREGON CITY, OREGON 97045
503/655-7484 * NOON-10 TUE-SAT
APRIL 1989
UPDATE MAGAZINE APRIL 1989
vwHZS OD, IS PRINTED WETH mv m DOT.
STEIN 300 PRINTER ~ DRIVEN BY
+He Z=88 WITH 4 46 BATTERIES
PORCIPCPOA CPE ODE PE DE SOE PEDO DORE DOMED IOM PE POP POPE OVE IEPE EI
11 18 MRD TO BELIEVE THAT THEY HAVE JUST BUILT A COMPUTER WITH A
TYPEWRITER KEYBOARD, POWERED DY AND
NOLSER TNO ACL THE PROORANS FOR BERLOUR BUSINESS AND WORD PROCESSING
PPLICATIONS) PERMANENTLY LOADED INSIDE THE COMPUTER! NZ) IT WILL FIT
IM A BHALL BRIEFCASE OR A LADIES PURSE!
FLUO IN THE PORTABLE CABLE AND IT WILL PRINT TO ANY PRINTER IN MANY
NT TYPE SHAPES AND SIZES UBINO THE EASIENT AND BEST WORD
HO PRODRAM AROUNDIT!
HERE_ARE ROME EXANPLER Nice print with Mike's battery cell powered
. Ttabics printer that fits in a small briefcase with
Underdine the 288. Print is reduced 75% from common
4 Pica for the ad.
CAN AUD UR TO J MEGABYTES METORY
Le
Late Breaking News!
Dieny ineuueae !
LEAT AEYBOARD?
ASIC INCLUDE.
ULL FO CHAR.
lB laasersn sesren rmgkueem vacsieacscsceses
JALAT LEAST 80 HORE PRINT VARIATIONS AVAILAT
Storage Media for the 288:
aD
SCREEN - Both a new DISK INTERFACE
and Audio Cassette Intfc
ace being released for
SUGGESTED BBTRG OPTIONS:
the Cambridge 288. Also,
fe PAMALLEL PRINTER CABLE 6 + ee 65 a battery cell powered
ELOALED ADAPTER LeAR) 7 : a3 Disk Dxive is now
* Pree’ with
D. PLY. INBTRUCTION MANUAL 2-08 PURCHASE | FREE available. Check with your
Be PRE Moonen“ Fnie'winh Z-a0'rimennss "Pree dealer for the prices and
0. MODEH wee ee ee ee ee eee ee eo 8208 expected time of delivery.
IMMEDIATE DELIVERY! PAID FOR BY ME: BY Ur uroN necexPT OF MONEY These new storage media
ORDER, Of CLEARING OF CHECK MADE OUT TO DOMINO CUBES. will enable inexpensive
software to be marketed
JO ARR: REMD NEY Int DOMINO CUBES in support of the 288.
Bee Ww. se ST
N.Y.CITY 40018-4402
HIKE PLN
CLUB 288
DON’T
MISS OUT!
SSS _------_-——— |
‘ONE YEAR CLUS 786 MEMBERSHIP
Uineludes six feeuee of PIPELINE) © $24.95 {
SPECIAL £19.05/yeer INTROQUCTORY THO-YEAR MEMBERSHIP i
(includes tyelve fssues of PIPE*LINE) $39.80 |
Ll SAYPLE INTRODUCTORY PIPE*LINE ISSUE $3.00 H
|
PAYMENT BILL MY.
ENCLOSED OC CREOIT CARO CJ ae Cl MASTERCARD I
CARD # a rn |
1
nave PHOHE @ |
ADDRESS: \
CITY/STATEs, |
if
1
i}
Add 98.00 for ati
other foreign countrise.
Cesigns
(29722 Hull Road
Colton, Oregon 97017
(603) 824-2686
(Essa Ee en nnd
31
APRIL 1989 ; UPDATE MAGAZINE
UPDATE MAGAZINE APRIL 1989
** = TS-2068 **
DISK SOFTWARE LIBRARY
Each of these DISK ENSEMBLES have at least one major software and many utilities. All
ace NEW programming designed especially for DISK DRIVE. In fact, they are such bargains
the each ensemble is guaranteed TO PLEASE, or your money back. There is such an
assortment in each disk that several are bound to appeal to you and be more than worth
the price.
Formats: Larken LKDOS, OLIGER S00S, AERCO FD-68 DOS: 40 Track or 80 Track DSDD. Please
specify Type DOS, amd Type Drive, 40 or 80 Track. Price $20.00 per disk. 5% discount
for two or more in same order,
OCTOBER 88 Smart Text Disk April-July "Mitchell Disk"
For All Disk Systems ey ee
7 For ALL DISK SYSTEMS. Two issues of Update
A complete Adminstrative Software: This is Magazine were devoted to the documentation
the ONLY Data Base software for the TS-2068 o¢ this excellent HOUSEHOLD BUDGET
that was designed for Disk Drive. It is a software. Also included are all of the
HUGE software that is MENU DRIVEN to guide other utilities and programs given in the
you. No print or Command codes are mixed april and July 88 issues of Update
in with text, which allows full management magazine, plus some exciting surprises
without hassle. Some features: Data Base thrown in to FILL UP the disk. Budget is
Manager - Disk Manager ~ Word Processor - worth the price. The Utilities are worth
Mail Merge ~- Automatic printing - the price. And the surprises ice the cake.
Selectable Column print - Label print from $20.00
Mail list - Selectable RETURN label with
each out label ~: Letter addressing from
Mail List ~ Multiple automatic Letters - ocr 87-Jan 88 Issue Disk - For All DOS
Print coupled files from disk in letters f
oc manuscript. The only limit to the The Feature software of this disk is the
length o£ print out is the number of data = maid. Merge” Data Base ard Printing
files in the disk library!. Automatic oftware, This is by far the most useful
centered Headers - Automatic Letterheads s-2068 Mailing List, amd the easiest to
and Sign Off - Completely compatable with use, Update Magazine uses it to keep tle
all Centronics Parallel Printers, Dot subscriber data base, tokeep records of
Matrix ard Daisy Wheel. Start printing your equipment, ard to print out the labels
imediately. Smart Text is the Largest for mailing. Use with ANY Centronics
and most comprehensive software ever put printer and ANY Interface. Mail Merge is a
together for the TS-2068 Has a 3 hour DISK DRIVE software. Also included are two
running TUICR in disk to let you get going ancillary Mail File Manager programs, "List
in a day. Smart Text comes on TWO 40 track Locker” and "Purity". The products of
disks or one 80 track disk. $20.00 these three programs “integrate” with the
Smart Text software for automatic letter
addressing. But this Mail Merge software
OCTOBER 88 “Hartung” Disk for Oliger DOS does its own printing also. Mail Merge can
ONLY. also be used for other data base purposes,
such as Inventory. Additionally, this disk
This is the most complete set of DISK contains a set of utilities for managing
MANAGEMENT Utilities for any computer. EXTRA MEMORY, another set called
Called "The DOSDEX Series", the utilities "j-Utilities” which includes one to perform
allows you to do anything that is possible "mixed math" with mixed number bases.
to do with Disk Files and Programs, (Multiply FAFF Hex times 425 decimal and
including FULL COPY, FORMAT, Single file the answer pops up in HEX, Decimal, ard
copy, Index and Manage a library. The Binary!), MORE- 20 Sound and utilities are
"DOSDEX MGR" utility operates as a MASTER given. No more room on the disk to put in
MENU program to load in and use as a anything else! $20.00
selective MENU for individual disks. There
is No better Disk Management for ANY
Computer. Surprises £ill the disk. $20.00
ce,
cok INDEREA
i ur TYPE, PRESD.
elgest -BBea of 80 ‘Track OS
al
52
APRIL 1989 UPDATE MAGAZINE
UPDATE MAGAZINE
ikke
DISK and
Both 80 Track Floppy Disk and Micro Drive are supported.
program is designed to accomlish two goals:
Programmers to WCRK for us by disseminating their good software through Update Magazine....
inexpensive, North American, software.
later. The "Issue Disk/MDV"
provide you with
MICRODRIVE
APRIL 1989
erry
SOFTWARE LIBRARY
3.1/2 inch 80 track support will come
1. To encourage
2. To
The proceeds of disk/miv sales, after
expenses, go the the Authors of the centerpiece software in the disk/mdiv.
Most of the disks and mdv carts will contain the software and utilities that are documented in
the pages of Update Magazine.
Update will be in the form of a "Mini Manual".
Some of the programs are given in Listings,
listing of a major QL software is too long to be published.
but mostly a printed
So, in most cases the documentation in
Orders for the Issue Programs on Micro Drive cart must be accompanied with a Cartridge from the
user,
adv's",
extensions for use with extra memory systems.
Presently, there are only two QL Issue Series.
These are such bargains that they are offered with a
Update, then more as Programmers participate.
GUARANTEE to PLEASE, or return for full refund.
OCTOBER 88 “CABLE A" Series
The Cable A series comes on one 80 track
floppy or two MDV carts. Orders for MOV should
be accompanied with two MDV carts. This series
contains the four softwares by Bill Cable,
given in the October issue. "HELPER" is a
super-basic group of TOOLS to manage Micro
Drive ani Floppy Disks, and to incorporate
functions not otherwise possible to do. You
can read files directly to screen from any
medium, FULL COPY from one medium to another,
COPY OVER, Format, Delete, and completely
manage 2 Eloppies and 2 micro drives plus ram
disk. Split screens are used to see the
directories of two elected mediums. I use
HELPER as a boot program to completely manage
my entire floppy and mv library.
“REFIELD" is a major software that uses
Acchive. Some would call this "Archive
Doubler", an apt name because it just about
does that.
"SCAN" is Archive Utility that lists
Archive Fields and sums up their numeric
content, prints if desired.
"ARITHMETIC" is a neat
for the kids, or for you
Basic ‘Tutor to help learn
Basic.
To give an idea of how massive this series
is, REFIELD alone takes up one whole mv
cartridge. Then the other three can be
squeezed into another cart. An outstanding
value at $20.00!
Super Basic program
to use as a Super
to program in Super
CCIOBER "HARTUNG A" Series
Bob Hartung gave a Super Basic program
"ADDRESS FILE" in the Oct. Update. ‘This was a
Key-in project. The program provides a "stand
alone" mail file data base and printing
capability. Address File is easy use, and can
Le used for other purposes such as Inventory.
It can also print labels. Screen or paper
print ouls can be by Alpha sort, or by Last
APRIL 1989
Some Issue Series will require two cartridges.
All of the Issue series are for both Unexpanded and Expanded OL Systems.
53
"one or two
Some may have
Each issue listing will say
Another will appear in the July issue of
All Issue Series are priced at $20.00.
name sort. Individual names can be searched
out. More disk and mdv tools are presented in
this (April) issue. These utilities are also
included in the Hartung A Series.
The Hartung A series comes on one 80 track
disk or One Micro drive cartridge. Please serd
a formatted mdv cart if for that medium. Price
is $20.00.
CAMBRIDGE 288 ISSUE DISK SERIES
UPDATE intends to support the 288 with the
Issue Disk series. With the release of both
Disk and Cassette storage interfaces, we will
likely choose the disk medium for its faster
utilization. We should see programming support
developing rapidly. The 788 uses the "280
cpu" which is familiar to our TS-2068 and
TS-1000 programmers. So, there is already a
wealth of skills to be put to work developing
software for the Z88. We anxiously await.
WANTED:
Also want a
QL Disk Interface, (CST or
"Miracle 512K Ram
PO Box 127,
Kenton Garrett,
Lansing, KS 66043 (phone 913 727 3344).
Kenton ask about The fountain of Youth, his chart shows as
being in N. Florida. Yep Ken, it's at Ponce DeLeon, Fla, named
for the explorer. We go every qtr to wade in the spring. One
hour zeroes out a qtr of aging. Stay too long ard you get
cecesding whiskers. Kinda like in-growing toe nails.
There are some old locals around Ponce De Leon. ne lady
says that she is 242 (contrary to femme tenancy to deny age).
They say ste has 46 children, none yet of child bearing age.
ne graduated from grade school four tines. You see, tle
stream crosses her farm, ard they take stream baths. They had
to fence off the stream else the pigs would’nt grow.
ne 88 yr old moved in from Ohio. Nobody ever saw any moving
activity since, and now a young feller lives there and courts
the pretty native girls.
Me? I moved here after Lee surrendered. I like the area for
its mild Winters and good fishing. Could tell more, but Ponce
De Leon would erd up being the biggest metropolis in North
America. Keep this under your hat. ——-BJ.
UPDATE MAGAZINE
1419 4
OREGON CITY,
503/655-7484 » MOON-10 TUE-8AT
ja
ja}
4
HOR Aee sees
SISTER
LKOOS SINGLE DRIVE UNIT
Here 1s a GREAT starter setup!
If you are Just getting Into dix
drives, this one will allow you to
expand tater-inctudes Items belows
LARKEN DISK 1/F —- CABLE
LKDOS CARTRIDGE-DEMO DISK
A-MITSUBISHI 3.5" 4YOOL DD
UTILITY PROGRAMS-FULL ‘DOCS
STEEL CASE W/POWER SUPPLY
Send copy of ad m/ck or HO for
\
aq
&
ONLY $240.00 + $0 PH
Order either system thiv ad and
get $ FREE DISKS! RMONP102
Din Ooino no Myo nia
Dp ojo
ASS Se oes esssapas
oF
DISK
SYSTEMS!
VERE THE
LARGEST -
LARKEN dealer in the U. S,! That’s
why we can offer more 2068 systems
than any one at better prices!!
This is our lowest priced systen-~
they start here - many more of
these COMPLETE DISK SYSTEMS! Start
with this one for only--
$180.00!
(Plus $12 P&H)
System includes 2-3" SSDD drives
case/power supply/cable
AND the LARKEN LKDOS I/F with s/w.
WHERE HAVE YOU SEEN SUCH A DEAL?
System is ajso compatible with the
New LARKEN RAMDISK. Don’t wait!
OFFER ENDS 5/1$/89 - POSITIVELY!
sa _j|RMG ENTERPRISES
== =s uy 172 7TH STREET
UREGON CITY, OREGON 97045
903/655-7484 © NOON-10 TUE-SAT
DISK DRIVE AY STEM BP RCIA
Looking for a disk drive system? LOOK NO FURTHER!
RNG ENTERPRISES
42 7TH STREET
OREGON P7049
2 ARARRAE AO
SLOAN 8
LKDOS DUAL ORIVE SYSTEM
This ayetem is READY-TO-RUN! Just
plus tee folie Includes ALL of
© following items:
LARKEN I/F & DUS CARTRIDGE
2- MITSUBISHI “OOK 3.5" DD
STEEL CASE W/ POWER SUPPLY
CABLE & DEMO/UTILITY DISK
FULL LKDOS DOCUMENTATION
All this AND after sale support!
Send copy of this ad w/ ck of HO
You SAVE 10% off regular low price
ONLY $265.00 + $0 PN
RHONPLO7 (Offers end 6/30/87)
SE32R 3320593338988 aR
QLQ@LQLGL@ALGLGLALQALQGLGALGLALQLaL
READ ANY GOOD OL BOOKS LATELY?
HOW ABOUT A USERS HUIDE FOR ARCHIVE THAT’S COMPLETE
AND WRITTEN IN PLAIN ENGLISH FOR A CHANCE!
HERE IT IS! JUST FOR YOU!
ARCHIVE MASTER
Our new book will shipping out shortly after the ist of
arch 1987. We don’t think that there is anything about
[VE that we have forgotten to cover, We may have
missed some small detail, but we can’t find it!
Dopo pojo
Dopp ppp po
The book covers ALL COMMANDS and ALL FUNCTIONS in detail!
We step you through each of these and then go on to show
you how to create the ‘PERFECT FILE’. After that, we show
you how to add NEW FIELIS to an existing file.
The next step is to show you, IN DETAIL, the SEDIT or
SCREEN EDIT function. Have you ever turned off your Qi.
without closing a fle and tried to open it again only to
get ‘CANNOT OPEN FILE’? If so, we have included a fix for
fhe conrupead files THIS ONE Aco 1S WORTH THE PRICE id
1 An that’ tet we even give you the
Kstitgs'ror'sit oF our business sereeater
AUL Of this at a price of ONE PROCRAH!
ONLY $44 _ 9S s43ph
Over 200 B 1/2"x11" pages in a quality 3 ring binder.
ANOTHER SUPERB EXECUTIVE WORKSHOP PRODUCT FOR YOUR QL!
AVAILABLE EXCLUSIVELY FROM:
RMG ENTERPRISES
1419 1/2 71H STREET
OREGON CITY, OR 97045
503/655-7484
Q@LGLQLGLQ@LALQGLQGLG@LALQLQAL@GLaLaL
UPDATE MAGAZINE
APRIL 1989
New Lawer Prices and NEW PRODUCTS!
01 SPECTERM—é64(TS—4.1)
300/1200 Terminal Software for T/S2068
On JLO, AERCO, Larken disk or tape.
Compatible with 2050 modem or standard
RS-232c modem with Z-SI/0 (below).
Only $17.50 + $2.50 S&H
[] 2-SI/0 Gare Boards
RS-232c Serial Interface for T/S2068,
With EBEE 2050 card! Easy to assemble.
Only $24.50 + $2.50 S&H
0) MAX-COM Software
300/1200 Terminal/BBS Software for the
T/S 2068 with LARKEN (v.3) Disk System.
Only $25.00 + $2.50 S&H
LAREKEN Disk Hardware:
{ ] LARKEN Disk System
Includes LARKEN Floppy Disk Interface, LKDOS (v.3)
Cartridge, Operating Manual and LKDOS Utiities’ Disk.
Only $125.00 + $5.00 S&H
{ ] LARKEN "Turnkey" System
Includes everything above plus one disk
drive, with case, power supply and drive cable.
It's Beady to Run, just connect to the T/S2068.
Only $225 & up + SIS S&H
Design YOUR OWN system! CALL
[ ] LEDOS Cartridge for OLIGER System
Specially configured LKDOS (v.3) Cartridge that
works with your JLO SAFE Disk hardware. Includes
Operating Manual and LKDOS Utilities’ Disk.
Only $65.00 + $3.50 S&H
Continued
P.O. Box #2186,
[] Announcing: PIX-FX
EP GREY EXTEREOUISES
Now YOU can take a T/S2068 screenS and
create all sorts of SPECIAL EFFECTS. Wrap
your SC$ around a globe, change perspective,
magnify, reduce, and merge SC$ plus more. Pull
Down Menus, use keyboard or joystick. Disk drive
compatible. Excellent documentation.
On tape: $25.00 + $2.50 S&H
On disk: $30.00 + $2.50 S&H
Modems, Printers afithe
{ ] Avatex T200<E> (S00/1200)......569,
{ ] Seikosha 180Al (100/20)..5159
{ ] Seikosha SL8OAI (24 pin)..S335
[ ] Wordstar3.3 (CP/M)..540 + BS S8H
Incl. Deluxe MicroPro WS manual, upgradable.
{ ] PC-Draw(v.3).. 512 + S250 S&H
Circuit Bd design pgm for T/S2068
{ ] DO Power Supp B50 + BS S&H
110/220 AC : DC +12V 2.6A, +5V 1.6A
{ ] 5.25" Diskettes..25/$12.50 + S&H
Used once, PREMIUM QUALITY, guaranteed,
$8H CHARGES> MINMUM: $3.00, ea. modem: $4.00,
ea. printer: $11.00, ea. software: $2.50. (COD add
$3.50, CA add sales tax, Canada double S&H)
is brought to you by:
Timex/Sinclair Support
Ed Grey Enterprises
Inglewood, CA 90305
Info >> 213-759-7406 << Order
Call The Grey Hatter BBS & RCP/H (213-971-6260)
APRIL 1989
UPDATE MAGAZINE
Live Music
Archive
Librivox
Free Audio
Metropolitan Museum
Cleveland
Museum of Art
Internet
Arcade
Console Living Room
Open Library
American
Libraries
TV News
Understanding
9/11